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PREFACE 



This manual describes the Network Operating System/Batch Environment (NOS/BE) Version 1.3 Operating 
system ror me ^urN±K.UL uaia-i-idcr i /u aeries; ^ui> 1 iw^l, u/iift-^iDEix /u muucis /i, /z., /j, 
74; and CONTROL DATA®6000 Series Computers. It contains general information about files, job flow and 
execution, and control statements. It is written for applications programmers who write higher level 

assembly language. 

Extended memory for CDC CYBER 170 Models 171, 172, 173, 174, and 175 is called extended core storage 
(ECS). Extended memory for CDC CYBER 170 Model 176 is analogous to the CDC CYBER 70 Model 76 
large central memory (LCM) or large central memory extended (LCME). When ECS and LCM/LCME are 
functionally equivalent in this manual, the acronym ECS refers to ECS and LCM/LCME (see appendix D 
for differences between ECS and LCM/LCME). 
The following manuals contain information about NOS/BE. 



Control Data Publication 

NOS/BE Version 1 Operator's Guide 

NOS/BE Version 1 Diagnostic Handbook 

NOS/BE Version 1 Installation Handbook 

NOS/BE Version 1 System Programmer's 
Reference Manual 

On-Line Maintenance Software Reference Manual 
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INTERCOM Version 4 Reference Manual 

INTERCOM Version 4 Multi-User Job Capability 
Reference Manual 

INTERCOM Version 5 Reference Manual 

INTERCOM Version 5 Multi-User Job Capability 
Reference Manual 

CYBER Common Utilities Reference Manual 

CYBER Record Manager Basic Access Methods 
Version 1.5 

CYBER Record Manager Advanced Access Methods 

Version 2 

SCOPE Version 2 Operator's Guide 
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The NOS/BE Version I Operator's Guide and the SCOPE Version 2 Operator's Guide replace the NOS/BE 
Version 1 Station Operator's Guide/Reference Manual (publication number 60494200). The NOS/BE to 
NOS/BE link is described in the NOS/BE Version 1 Operator's Guide. The NOS/BE to SCOPE 2 link is 
described in the SCOPE 2 Operator's Guide. 

This product is intended for use only as described in this document. 
Control Data cannot be responsible for the proper functioning of 
undescribed features or parameters. 
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INTRODUCTION 



NOS/BE is the 0"eratin» system for the CDC CYBER 170; CYBER 70 Models 71, 72, 73, 74; and 
6000 Series Computer Systems. It is the basic system software that coordinates all other system software, 
user programs, and hardware action. 

The operating system offers a standard set of functions that can be utilized by system programs written in 
the COMPASS assembly language and by user jobs. It also supports software packages known as the 
NOS/BE 1 product set. The product set includes compilers common to more than one Control Data operating 
system and products that are unique to the NOS/BE operating system. All products run under the control of 
the operating system. 

NOS/BE is a multi-programming, multi-processing operating system. Many jobs can be in the system in 
various states of processing. It is not necessary for one job to complete before another job begins execution. 
Among the tasks the operating system performs for a job are: reading the job into the system, assigning it 
system resources such as central memory and mass storage files, scheduling execution in the central processor, 
and performing end-of-job procedures that dispose of files used or produced by the job. The operating system 
also controls the environment of the software and hardware used by a job, such that the resources available 
to all jobs are used efficiently. 

The remainder of this section presents background material about the hardware of the CDC CYBER 170; 
CYBER 70 Models 71, 72, 73, 74; and 6000 Series Computer Systems. Product set members that are 
intimately involved with the operating system but fully described in other manuals are also summarized. 

HARDWARE FUNCTION AND USE 

The CDC CYBER 170; CYBER 70 Models 71, 72, 73, 74; and 6000 Series Computer Systems have the 
following hardware components. 

Mainframe of the computer formed by one or two central processors* central memory, and peripheral 
processors 

Operator console through which the operator oversees software and hardware operation 

Peripheral devices including (at minimum) rotating mass storage devices, line printer, card punch, card 
reader, and magnetic tape units 

Additional hardware that can be part of the system includes: 

Extended core storage (ECS) 

Graphics terminals and plotters 

Different types of line printers and magnetic tape units 
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All of the previously mentioned hardware usually resides at a central site. However, the CDC CYBER hard- 
ware and NOS/BE operating system also can have remote sites connected to the central site through several 
kinds of communication lines. 

More than one central site can be linked together. In particular, a site with 6000 Series Computer Systems 
can be linked to another 6000 site or to a 7600 site so that users in one location can receive the benefits 
available through more than one system. 

The following discussion introduces the main components of the CDC CYBER 170; CYBER 70 Models 71, 
72, 73, 74; and 6000 Series Computer System and shows how they are used during system operation. 

MAINFRAME AND CONSOLE 

The mainframe consists of central memory, central processor, and peripheral processors operated through a 
display console. 



CENTRAL MEMORY 

Central memory consists of 60-bit words. Memory holds instructions to be executed by the central processor, 
data to be manipulated by the central processor, and data buffered to and from peripheral processors. Any 
given system can have memory with 65K, 98K, or 131K words. Memory sizes of 198K or 262K are avail- 
able with the CDC CYBER 170 series. 

A CDC CYBER 1 70 has a central memory control that controls the flow of data between central memory 
and the requesting system components. 

Two portions of central memory known as low core and high core are reserved for system use. Low core, 
the beginning address of central memory, contains central memory resident (CMR) and a small library of 
system routines frequently used by peripheral processors or the central processor during operating system 
functions. These library programs exist in memory because they can be loaded from CMR much faster than 
from the rotating mass storage device on which the rest of the system routines reside, and thereby reduce 
system overhead. CMR also contains system tables and pointer words, the communication area that links 
peripheral processors and central memory, and control point areas. High core, the highest numbered addresses 
in memory, contains information relating to allocation of space on rotating mass storage devices. The amount 
of memory assigned to low core and high core varies during operation, with space not currently required 
being released, so that a maximum amount of memory is available for user jobs. 

NOS/BE is a multi-programming system. This means that more than one job can be in central memory at the 
same time. Although only one of the jobs can be using the central processor in a single-processor system at 
a given time, all other jobs in memory can have peripheral processors executing tasks for them during that 
time. 

Figure 1-1 shows central memory allocation to the system and user jobs. As shown, the first address is at the 
extreme low end of central memory and the last address is at the extreme upper end. 
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Unused Storage 
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Unused Storage 
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Unused Storage 



Job at Control Point 3 
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areas) 



Figure 1-1. Central Memory Allocation 



CONTROL POINT DEFINITION 



Each job in central memory is assigned a control point number. Control points are the concept by which 
memory, the central processor and system resources are assigned to a job in memory. Any job in memory 
has a control point number to identify it and has a 200-word control point area in CMR in which the 
system stores information about the job. The exchange package for the control point is also stored in the 
control point area. 

The physical portion of central memory allocated to a job is related to the control point number to which 
the job is assigned. This assignment is made and maintained in numerical order. Thus, the job at control 
point 2 follows the job at control point 1, and the job at control point 3 follows the job at control point 2, 
as shown in figure 1-1. 
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Through a dynamic relocation process, jobs are moved up and down in memory to make room for new jobs 
assigned to control points. The relocation process occurs continuously as memory requirements change. For 
example, jobs might be running at all control points except control point 2 when a new job is assigned to 
control point 2. If sufficient contiguous memory is not available for the new job, other jobs are relocated as 
necessary to provide sufficient contiguous memory. Each job is moved as a block. It might be necessary to 
relocate the jobs at both control points 1 and 3, or to relocate only one of them, since unassigned memory 
can exist between control points. 

When a job is moved in storage, the monitor routine (MTR) suspends all user program activity at the control 
point, waits for all peripheral processor units (PPUs) assigned to the control point to clear their field access 
flags, and then starts the system routine that moves the job. When the move is complete, the reference 
address of the job is modified, and job activity resumes. The job is not affected by this change in location. 
Since all program locations are relative to the beginning of the job field length, only the reference address 
(RA) in system tables needs to be changed when the job is moved. 

Up to 15 control points, numbered 1 through 17 octal, are available for user jobs. An installation can choose 
fewer than 15. Control point is used to identify all hardware and software resources not presently allocated 
to user jobs, or to identify resources known only to the operating system. 

At a typical installation, one of the 15 control points is assigned to JANUS, the operating system routine that 
controls the line printer, card punch, and card reader. JANUS uses central memory buffers, but the actual 
driving of equipment is performed by peripheral processor, not central processor, programs. 

An installation with remote terminals uses INTERCOM to communicate with those terminals. INTERCOM 
does not use any central processor code to control this communication but executes entirely within the 
peripheral processors. The central memory required for buffers and control tables is obtained by extending 
the CMR area. A control point is used only when a task requested from a terminal requires the use of the 
central processor. 

A control point and a job are associated only when the job is in memory or when it has been rolled out. 
When a job is swapped out, it loses its control point identification. 



HELD LENGTH DEFINITION 

Every job in central memory occupies a contiguous block of words. The block is not of fixed size, but rather 
varies with the needs of the job. The length of the block is the field length (FL) of the job. FL-1 is the 
relative address of the last word in the block. The first word in the block is known as the reference address 
(RA); all addresses within each block are relative to RA. 

A job can reference locations within its field length, but not outside its field length. Any attempt to read or 
write outside a job field length is prevented by the hardware, so that all other jobs and system programs in 
central memory are protected from being accidentally overwritten. For this reason, each job can consider that 
it is running alone in a computer with a central memory the size of its field length. 

The operating system dynamically manages the field length assigned to a job, so that memory is not needlessly 
tied to a control point when it is not required. Field length increases or decreases as the job progresses. A 
job step such as a file copy operation, for example, requires much less memory than a step such as a program 
compilation. The operating system adjusts the field length to the job step needs. 
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A job normally does not stay in central memory until completion but moves into and out of memory in 
relation to its needs for system resources, such as tapes or the central processor and to the needs of other 
jobs in the system. The scheduler routine of the operating system is responsible for moving jobs into 
memory to maximize system throughput. 

JOB SWAPPING AND ROLLING 

When a job with a high priority enters the system, existing jobs of lower priority might be swapped out or 
rolled out of central memory. The user can specify initial job priority within certain ranges, but the operating 
system adjusts this priority according to factors such as the system resources requested or allocated and the 
time consumed in waiting for resources. Some functions requested through remote terminals and those that 
affect overall system efficiency are assigned high priority. Actions by the central site operator also can affect 
the priority of any given job. 

When a job is swapped out, all information reflecting the current status of the job is written to a mass storage 
file. The field length and control point associated with the job are made available to the scheduler. As control 
points and central memory become available, swapped out jobs are swapped back in to continue processing. A 
job can be swapped into any free control point; thus, a job might run at several different control points before 
it reaches termination. 

When a job is rolled out, its job field length is written to a rollout file before the field length is freed for 
another job. The control point is not released when rollout occurs. If extended core storage (ECS) or 
magnetic tape is being used by a job, that job can be rolled out, but not swapped out. 

If a job is waiting for a permanent file to become available or for a mass storage device to be mounted, the 
job can be swapped out automatically. When the permanent file or device becomes available, the job becomes 
eligible to be swapped in. 

Swapping or rolling might increase the total time that a job spends in the computer, but it has no effect on the 
amount of central processor time used by a given job; and it should help overall processing. Job swapping 
and job rollout are controlled by the scheduler. The most important system effect is to maintain high central 
processor utilization. Frequent short central processor access is balanced with longer, less urgent, access. 



CENTRAL PROCESSOR UNIT 

The central processor unit (CPU) is an extremely high-speed arithmetic processor that executes the instructions 
of system or user programs. It performs computational tasks, but must use central memory for all its input and 
output including communication with the operating system. 

Depending on the specific hardware model, a system might have one of two types of central processors or 
might have both types of processors in a single system. The differences in the processors has to do with the 
number of functional units available for concurrent operations, and hence the relative speed at which a given 
set of instructions can execute. 

The CDC CYBER 170 Models 171, 172, and 173; CYBER 70 Models 71-lx, 72-lx, and 73-lx; and the 6200 
and 6400 Computer Systems each have a single processor that has a unified arithmetic unit in which 
instructions must be executed serially. 
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Storage space on rotating mass storage devices is assigned to a file as it is required by the file. When a job 
creates a file, it does not request a particular size of file, and no preallocation occurs. Files on mass storage 
grow as they are written and can overflow to another physical device. 

All rotating mass storage devices belong to a logical grouping known as a device set. The installation configures 
these sets to its own needs. 

Public device sets hold system files and user files from any job. 

Private device sets hold only files that a job specifically indicates should be on a private device set. 

The user job selects the device set on which files are to reside by specifying a specific setname or by default. 

UNIT RECORD EQUIPMENT 

Unit record equipment is of two categories: 

Standard unit record equipment is the line printer, card punch, and card reader necessary for the 
operation of all systems. 

Other unit record equipment can include graphics consoles, plotters, and paper tape readers and 
punches. These are not a part of the basic system. The operating system defines codes pertaining 
to files on these devices but does not include the programs needed to operate the equipment. Non- 
standard unit record equipment runs under control of software provided by an installation. 

Standard unit record equipment runs under control of the part of the operating system known as JANUS. All 
files to be processed by JANUS must be in a special format in which each card or line is terminated by a 
word with 12 bits of zero in bit positions 0-11. 

The card readers can accept, and the card punches produce, files punched with either of two different sets of 
Hollerith punched codes. Binary punched cards can also be processed in two formats. 

Various line printers are available. Models with removable print trains offer character sets with uppercase and 
lowercase English, fonts with other languages, etc. Fewer unique characters on the train generally increase 
print speeds. Depending on the code sent to the controller and the controller translation of that code, a 
character that is produced on one printer can appear as a different character on another printer. For 
example, a quotation mark output on one printer might well appear as a # on another. This often occurs 
when the character desired is not present on the printer to be used for output. 

When an installation has different types of unit record equipment, the job is responsible for providing informa- 
tion in the format required for processing on a particular device. 

MAGNETIC TAPE UNITS 

The operating system supports both 7-track and 9-track magnetic tape units. When an installation has both 
types of units available, the job is responsible for specifying the type of hardware unit required to process 
a given tape. The system default is a 7-track tape. Both binary and coded information can be written. 
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For a binary tape, bit patterns are written to the tape as they appear in memory. 

For coded tape, 6-bit characters in memory are translated to a different 6-bit pattern, known as external 
BCD, before they are written to the tape. 

Density for a 7-track tape can be 200, 556, or 800 bits per inch (bpi). 

A 9-track tape corresponds to tapes in industry-standard format. Both binary and coded information can be 
written, but the information is not the same as 7-track binary or coded information. 

For a 9-track binary tape, bits are packed, with three 8-bit characters on tape corresponding to four 
6-bit characters in memory. 

For 9-track coded tape, bits are either packed or are in 8-bit character codes; the two possible codes 
are the 64-character ASCII and the 128-character EBCDIC characters. 

Density for a 9-track tape can be 800 characters per inch (cpi), 1 600 cpi phase-encoded, or 6250 cpi group-encoded. 

Another type of control over recording of tape information deals with the number of characters that appear 
between the physical blocks on the tape and how files and records are recorded. On both 7-track and 
9-track tapes, one of three formats must be selected: SI, S, or L. Each offers advantages depending on the 
use made of the tape. 

EXTENDED CORE STORAGE 

ECS is a second, supplementary form of memory that has two main uses. It can be used as a mass storage 
device or as an auxiliary direct access memory. Its large amount of storage and very fast transfer rates make 
it suitable for many tasks. 

CDC CYBER 170 Model 176 systems have a form of extended memory different than other CDC CYBER 170 
models but functionally similar. The CDC CYBER 170 Model 176 extended memory cannot be shared with 
other systems and does not have a distributive data path (DDP) capability. Other minor differences are in 
appendix D of this manual. References to ECS in the remainder of this document apply to extended memory 
oTall CDC CYBER 170 Models except as limited by the CDC CYBER 170 Model 176 differences described 
in appendix D. 

The use of ECS at any particular site depends on the options selected when the system is installed. Frequently 
used operating system routines can be placed on the ECS library file, rather than in the central memory low 
core library area, to reduce the size of low core used by the system without using rotating mass storage. In 
a multi-mainframe environment, ECS might be used to link the two computer systems. 

ECS can be used for buffering sequential files on public devices or for storing sequential or random files (ECS 
resident files). Each job specifies whether or not a given file will be buffered through ECS or reside on ECS. 
In this respect, ECS is the same as other mass storage devices except that ECS resident files cannot overflow 
to other mass storage devices. 

ECS can be accessed directly from a running program. In this case, a block of ECS is assigned to the user's 
control point. The block is delimited by RE (reference address for ECS) and FE (field length for ECS) fields 
in the exchange package. These fields are analogous to the RA and FL fields for central memory. In this 
mode, ECS is accessed by the ECS direct read/write hardware instructions which perform very high-speed block 
transfers of user specified length between the ECS and central memory field length addresses specified by the 
user. The main use of ECS in the direct access capacity is to hold large arrays and tables that do not fit in 
central memory and would otherwise require partitioning and partial residence on disk, or to otherwise reduce 
central memory requirements by moving the arrays and tables to ECS as their main residence. 
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REMOTE TERMINALS 

Remote terminals are physically linked to the central site by communication lines. Logically, they are under 
control of the portion of the operating system known as INTERCOM. INTERCOM allows a user at a remote 
site to access the central site facilities. INTERCOM is controlled by the central site operator and might not 
be available to remote terminals all the time the central site is in operation. 

Remote terminals are of many different types and complexities. General categories of remote terminals are: 

Teletype terminals, which might be a physical Teletype or a display terminal. 

Display terminals, which include a keyboard and a display screen, and possibly a character printer. 

Remote batch terminals, which have a card reader, line printer, and possibly a card punch attached. 
Some remote batch terminals have a display screen. 

All of the remote terminals provide interactive access to the operating system control statements. That is, 
control statements can be entered and executed one at a time without being submitted as a complete job. 
The remote batch terminals allow complete jobs to be entered through the card reader and printed output 
to be received. Users at remote terminals without a card reader can submit jobs constructed with INTERCOM 
features or permanent files stored at the central site. 

Different terminals operate in different character set modes. Some terminals can be reinitialized to accom- 
modate either ASCII or BCD data; others run only in one mode at all times. Frequently, the line printers 
of a remote terminal operate in a different mode than those at the central site. 

A job can be submitted at one site and specify that its output is to be returned to another site. All job 
output can be sent to any remote terminal, although it is usually not practical to send lengthy print files 
to terminals without line printers. Files can be routed between remote sites and the central site in either 
direction. Each terminal has an identifier assigned when communications are established between the terminal 
and the central site. This identifier is used to specify the location to receive files. 

INDIVIDUAL PRODUCTS 

In addition to the capabilities described later in this manual, the operating system includes several features 
which in turn provide many user options. Several of these features and product set members that are referred 
to by name in this manual are introduced in the following paragraphs. 

INTERCOM 

INTERCOM interfaces remote terminals with the central site computer. The central site operator must initiate 
INTERCOM as a program before remote access is possible. 
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Commands entered at the terminal keyboard call for a variety of INTERCOM capabilities. The first command 
at many terminals is LOGIN, which establishes the user's authority to use INTERCOM; some terminals do not 

fGCJUlfS ±s\Jkj*.N. 

INTERCOM has three distinct capabilities. All three are available from remote batch terminals; only the first 
two are available from terminals without batch capabilities. 

The interactive capabilities of INTERCOM encompass two types of commands. INTERCOM commands allow the 
terminal user to receive status about files associated with that terminal, display contents of files, and send messages. 
Any keyboard entry that is not an INTERCOM command is assumed to be an operating system control statement. 
Consequently, control statements that can be submitted as part of a job, except for magnetic type requests, can be 
executed one at a time through INTERCOM with a few minor exceptions. 

The file creating and editing capabilities of INTERCOM are the primary features of EDITOR. When the terminal user 
calls EDITOR through a terminal keyboard command, subsequent keyboard entries can become part of a file being 
created or updated. Interactive commands can also be submitted through EDITOR. When the created or updated file 
is a source program, EDITOR allows the program to be compiled and executed through a single keyboard entry. 
EDITOR displays the results on the display screen. When the file is a series of card images corresponding to a job 
deck, another command causes the file to be entered into the input queue of jobs awaiting execution as though the job 
had been entered as a card deck through a card reader. 

The remote batch capabilities of INTERCOM give the remote terminal user commands for line printer and card reader 
control. Jobs that originate through the remote batch terminals can be controlled to some extent through the terminal; 
jobs that originate through interactive commands are beyond terminal user control until the job completes. 

CDC CYBER RECORD MANAGER 

CDC CYBER Record Manager is the software package that performs execution time input/output for many 
members of the NOS/BE 1 product set. It is a common product described in full in the CDC CYBER Record 
Manager manuals. 

The operating system recognizes CDC CYBER Record Manager only as a central processor routine. The 
operating system does not use CDC CYBER Record Manager for any function. Rather, all CDC CYBER 
Record Manager capabilities are implemented through the standard operating system functions described in the 
later sections of this manual. 

CDC CYBER Record Manager defines five file organizations, eight record types, and four blocking types for 
sequential files. None of these are known to the operating system in the same terminology or implementation, 
although operating system actions and CDC CYBER Record Manager functions often result in an identical 
sequential file. 

COBOL programmers access CDC CYBER Record Manager through language statements. FORTRAN Extended 
programmers can access its capabilities through language statements or calls to CDC CYBER Record Manager 
routines. COMPASS programmers can use CDC CYBER Record Manager macros instead of the macros 
described later in this manual. Sort/Merge and FORM users can use CDC CYBER Record Manager through 
the language in which these utilities are called or through a FILE control statement available to all programs 
using CDC CYBER Record Manager for execution input/output. 
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FORM 

FORM is a file transformation utility. It is a common product described in full in the FORM Reference 
Manual. 

FORM can reformat files or records. As a file reformatting utility it has two capabilities: 

Reformat files defined to CDC CYBER Record Manager as sequential, indexed sequential, direct, or 
actual key organization. Files can be transformed into another of these organizations or into the same 
organization with a different physical structure. 

Reformat binary tape files in System/360 format for use under NOS/BE. 

As a record reformatting utility, FORM has the capability to add or delete characters from each record, blank 
or zero fill records, convert bit patterns to representations of characters or numbers, and in general change 
the contents of a specific record. FORM can select all records or only particular records for processing. 

FORM is called by a control statement or a COMPASS, COBOL, or FORTRAN Extended statement that 
specifies the general operations to be performed. Detailed instructions for FORM are submitted as directives 
that are part of the job deck or are on a separate file for a control statement call. Programs pass directives 
to FORM through common blocks. 



UPDATE 

Update is a utility program used for modifying files of coded data. It allows a Hollerith punched card or 
card image to be stored on rotating mass storage, while retaining the ability to modify file contents without 
recreating the entire card file. Update is a common product described in full in the Update Reference 
Manual. 

Systems programmers make frequent use of Update when they make local modifications to the operating 
system or its products. Update is not merely a systems capability, however. Any file of character data can 
be processed by the utility, whether that file contains a single program being converted from one language 
version to another, a group of subroutines, or a series of independent statements that a COPY sentence 
incorporates into a COBOL source program. 

A specially formatted file called a program library is created when Update first manipulates a file. This 
program library should not be confused with a library defined for Loader purposes. Update files, commonly 
named OLDPL and NEWPL, are Hollerith card images with history information provided by Update. Files 
identified as user or system libraries must contain assembled binary programs in a format suitable for loading. 
Update program libraries must be manipulated only by Update. 

Update is called by a control statement that specifies the general operations to be performed. Detailed 
instructions for Update are submitted as directives that are part of the job deck or on a separate file. 

More than 40 directives can be specified, giving the user a wide latitude in modifying the original program 
library and otherwise manipulating files produced by Update. Among Update capabilities are: 

Inserting or deleting cards 

Dividing the file into decks for manipulation as a group 
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Declaring decks common so that a single copy can be used repeatedly without duplication 

Temporarily or permanently removing corrections previously made 

Producing a new program library incorporating present corrections 

Producing a compile file of active cards returned to a format acceptable to assembler or compiler input 

COMMON UTILITIES 

The common utilities, COPYL and ITEMIZE, are file listing and updating utilities. (See the CDC CYBER 
Common Utilities Reference Manual.) 

ITEMIZE is a utility program used for listing information about the content of each record of a binary file. 
It processes files with system-logical-records and produces printed output. Output specifies the type of 
record, as determined from the prefix table or other information at the beginning of the file. Depending on 
the type of record, other information such as entry point names in libraries, overlay level, library table fields, 
or full text of records can be obtained. ITEMIZE is useful in determining the contents of user libraries, load 
tapes, and deadstart tapes. 

COPYL and its variation COPYLM replace binary records while copying one file to another. COPYL and 
COPYLM differ only in their handling of multiple occurrences of a record on the file being copied. They 
operate with binary or text records. These utilities are commonly used to maintain files of procedures or 
subroutines. 

CDC CYBER LOADER 

CDC CYBER Loader is the software package that places programs into memory so that they are ready for 
execution. Loader input is obtained from local files and libraries. Upon completion of loading, execution of 
the program is initiated if requested. 

Loading also involves performance of services such as generation of a load map, presetting of unused core storage to a 
specified value, and generation of overlays or segments. 
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JOB PROCESSING AND DECK STRUCTURE 



A job is a sequence of control statements followed by optional source programs, object programs, data, or 
directives. A job begins with the job statement and ends with an end-of-information indicator, 
physical card decks or images of card decks. 



Jobs can enter the system in several ways: 



Batch jobs on cards are read in through card readers at the central site. Batch jobs of card images are read 
from a load tape under the direction of the central site operator. 

Remote batch jobs on cards are read in through card readers at remote sites. Remote batch jobs of card 
images are transmitted from a file created at a remote terminal. All remote batch jobs interface with the 
central site facilities through INTERCOM. 

Interactive jobs are control statements submitted one at a time from a remote terminal keyboard under 
INTERCOM control. These jobs execute as a series of batch jobs created by INTERCOM in response to 
individual keyboard entries. 

All batch jobs have the same characteristics no matter what their origin. Remote batch jobs differ from central 
site batch jobs only in that output returns to the terminal and that remote jobs are subject to the limitations of 
the physical equipment at the remote site. Although all remote sites might not have the capability to produce 
line printer output, the file that normally would be printed is available on mass storage for display on the termi- 
nal. The following information about job decks applies to both decks and deck images. 

See the INTERCOM Reference Manual for specific details of output file handling and specific interface to the 
operating system, as well as for interactive procedures. 

All jobs in the system waiting to begin execution are collectively known as the input queue. Each job enters 
the system with the name specified by the first five characters on the first card in the job deck. The operat- 
ing system adds two unique characters to this name to distinguish it from all others in the system. 

Once a job enters central memory and begins execution, the image of the job deck is known as a file by the name 
of INPUT. During job execution, a file with the name OUTPUT is generated by the operating system. When 
the job completes execution, the file OUTPUT becomes part of the output queue. The output queue is the 
collective name for output files remaining in the system when the jobs that generated them have completed execu- 
tion. All print and punch files,and special disposition files such as plot, are part of the output queue. As printers, 
punches, or remote devices become ready, the operating system causes files from the output queue to be physi- 
cally output. Files normally return to the user with the name of the job that created them. 

Jobs do not read cards directly from the card reader; neither do they directly punch cards or print lines. All 
job input and job output is stored on mass storage files and on job process images of card or printer files. Physi- 
cal card reader, card punch, and line printer operations proceed under operating system, not user job, control. 
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DECK STRUCTURE 

The first card of any deck (figure 2-1) is the job statement; the last card has a 6/7/8/9 multiple-punch in 
column 1. Cards with a 7/8/9 multiple-punch in column 1 divide the deck into sections." 



Program, data, or 
directives in the 
order that control 
statements execute 



End-of-lnformation Card 



8 



L 



7/8/9 Card 



z 



I /7 



/ 



L 



L 



7/8/9 Card 



MY JOB 



Control 
Statements 



-Job Statement 



J 



Figure 2-1. Sample Deck Structure 

Control statements are instructions to the operating system or its loader. They are grouped together at the 
beginning of a deck. Collectively, the control statements form a job stream. Individually, the control state- 
ments are job steps. 



Control statements execute in the order in which they appear in the job stream, 
the control statements governs the order of other sections in the deck. 



Consequently, the order of 



The user is responsible for structuring the job deck such that there is a one-to-one correspondence between 
each control statement that reads from the file INPUT and the sections of the job deck. The operating 
system handles each section of the job deck only once, unless the job specifies contrary handling. For example, 



| 'f When a job deck is being created as card images through the INTERCOM EDITOR, the *EOR and *EOF 

entries result in the physical equivalent of 7/8/9 and 6/7/8/9, respectively. 
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consider two source programs to be compiled and executed with two different sets of data. When one pro- 
gram is compiled and executed before the other is compiled and executed, the control statements and deck 
structure must be: 

DECKA. 

COBOL. Compile first source program and write binary file LGO. 

LGO. Execute binary file. 

REWIND,LGO. 

i *3Q:\j%^ t {jomoiic s&coim source Dr02r3.n1 <niti wntc rip^s-?? fits lajO 

LGO. Execute binary file. 

7/8/9 

first source program 
7/8/9 

data for first source program execution 
7/8/9 

second source program 
7/8/9 

data for second source program execution 
6/7/8/9 

If both programs were compiled before either was executed, the corresponding deck structure would be: 

DECKB. 

COBOL. Compile first source program and write binary file LGO. 

COBOL,B=ABC. Compile second source program and write binary file ABC. 

LGO. Execute binary file LGO. 

ABC. Execute binary file ABC. 

7/8/9 

first source program 
7/8/9 

second source program 
7/8/9 

data for first source program execution 
7/8/9 

data for second source program execution 
6/7/8/9 

The preceding two decks illustrate the principles of all deck structuring. 
SEPARATOR CARDS 

One job is separated from another job by a card with a 6/7/8/9 multiple-punch in column 1 . This card is known 
as an end-of-information (EOI) card. 

Within a single job deck, each section is separated by a card with a 7/8/9 multiple-punch in column 1. Once 
on mass storage, these cards are represented by system-logical-record terminators of level 0, as discussed with 
rotating mass storage files in section 3. A compiler or assembler encountering a 7/8/9 card image during 
processing treats the card as an end-of-partition (EOP) or an end-of-file (EOF). I 
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An octal level number through 17 can be punched in columns 2 and 3 of a separator card. A level number of 
only one digit can be punched in column 2. When columns 2 and 3 are blank, a level number of is assumed. 
Level numbers are not normally used on separator cards. 

Interpretation of a 7/8/9 level 17g card depends on whether the ST parameter on the job statement indicates 
the job might be run on a system under control of the SCOPE 2 operating system. JANUS, the system routine 
that controls standard unit record equipment, converts a 7/8/9 level 17g card to the equivalent of a 6/7/8/9 
end-of-information card when the job cannot execute under SCOPE 2. No such equivalencing occurs for job 
decks that might execute under control of both NOS/BE 1 and SCOPE 2. A 7/8/9 level 17 g card should 
not be used in place of a 6/7/8/9 card when the job might execute under the SCOPE 2 operating system. 

Separator cards can be used to indicate whether the cards following them are punched in 026 or 029 
character codes, as discussed in appendix A. 



CONTROL STATEMENT SECTION 

The first section of a job deck contains only control statements. Each control statement results in the execution 
of a program in the central processor or in a peripheral processor. Many control statements call programs that 
make entries in system tables; others call programs that perform utility functions such as file copy. Several 
broad categories of control statements are: 



Operating system functions such as assigning a tape unit to the job or routing a print file to a remote 
terminal. These functions are fully described in section 4 of this manual. 

Utility functions such as file copy or creation of user libraries. These functions are also described in 
section 4 of this manual. 

Loader functions such as load, but not execution of a program, and satisfying program references from 
different libraries. Only the simplest LOAD and EXECUTE statements are summarized in this manual; the 
CDC CYBER Loader Reference Manual has complete details of all loader functions. 

Program call functions which are a request to the operating system to load and execute information 
existing on a file attached to the job. This function is discussed in the following paragraphs. 

Each of the control statements discussed in this manual is available to the job because the control statement name 
is the entry point to a program on a system library named NUCLEUS. 



LIBRARY USE 

A library is a collection of programs in executable form accompanied by library tables that specify the content of 
the library. The operating system uses the libraries as the source of programs with entry point names specified on 
control statements. 

Two types of libraries exist: system libraries and user libraries. 

A system library is available automatically to all jobs. It is named in the library name table in central 
memory resident (CMR). It is contained on a permanent file that can be read by more than one job at 
a time, and parts of it can be contained in CMR. 
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A user library is a file formatted as a library, but it is not available to a job until it has been 
explicitly brought to the job. The job might create the file before using it as a library, or it might 
be a permanent file that a job would attach explicitly. A permanent file might be such that more 
than one job could read it at once, but every job must explicitly attach the file. The EDITLIB 
utility can ue useu to create a user nurary. 

The particular libraries that are used for each job, or for each loading operation within a job, depend on the 
library set defined by the job. The total library set consists of the global library set, the local library set, and the 
system library NUCLEUS. 

NUCLEUS is a system library that cannot be removed from the library set. It contains the items listed 
under the heading System Texts in section 7. 

The local library set is defined by the loader control statement LDSET(LIB= . . . ). Local library sets 
are valid only for the current load operation. At the start of each load operation, the local library set 
is defined as empty unless the LIB parameter of LDSET is specified (see the CDC CYBER Loader 
Reference Manual). 

The global library set is defined by the loader control statement LIBRARY. Global library sets are valid 
throughout the job or until another LIBRARY control statement changes the global library. At the start of 
each job, the global library set is defined as empty. 

The loader uses the library set in the following order. 
Local libraries 
Global libraries 
NUCLEUS 

Any program name on a control statement is loaded first if a file with that name is attached to the job. Then 
the library set is searched and a program loaded for any matching entry point. In a simple job, the local library 
set and global library set are both empty, so that the NUCLEUS library is the source of control statements exe- 
cuted. Given the library set search order, however, any user program with the same name as a system program is 
executed when the proper library set is declared in the job. 

See the CDC CYBER Loader Reference Manual for further details of library use during loading. 



LOAD SEQUENCE 

A load sequence is a consecutive series of control statements that begins with a call that causes a program to be 
loaded into central memory. A load sequence ends with a call that initiates execution. The following is a load 
sequence with three control statements. 

LOAD(ABC) 
LOAD(DEF) 
EXECUTE. 



60493800 E 2-5 



All control statements in a load sequence must contain only instructions for the loader. Both LOAD and 
EXECUTE are loader statements. The other control statements that appear in this manual are not loader state- 
ments, unless they are specifically identified as such. 

Any control statement that calls for execution terminates a load sequence. Any name call such as LGO, ABC, 
REQUEST( . . -X terminates a load sequence. In most instances, a control statement initiates and terminates a 
single statement load sequence. 

Other statements that are part of a load sequence or that affect the loading of programs are: 

LOAD Loads modules from file specified. 

LIBLOAD Loads modules specified by entry point names from the library named. 

SLOAD Loads specified modules from the file named. 

EXECUTE Completes load and executes. 

NOGO Completes load and produces a core image on specified or default file. 

SATISFY Specifies name of a library to be searched for unsatisfied externals. 

LDSET Specifies a list of independent options that can preset central memory field length, alter 

default rewind options, control load map generation, define the libraries in the local library 
set, select loading error handling, and force loading or inhibit loading of routines. 

SEGLOAD Specifies segmentation, dividing large programs into sections. 

See the CDC CYBER Loader Reference Manual for a full description of these control statements. 
LGO AND PROGRAM EXECUTION CALLS 

All assembler and compiler calls allow the user to specify the name of the file to contain executable code. In the 
absence of another name, a file with the logical file name LGO is created. A job does not necessarily have a file 
with the name LGO. 

When LGO is encountered in the job stream, the operating system searches for a file with that name. In the 
default instance, such a file exists and it is loaded and executed. LGO contains the relocatable object code 
produced by the compilers in the absence of a source program statement that directs absolute code. (See the 
CDC CYBER Loader Reference Manual for absolute code information.) 

Similarly, any file name presented among the control statements is assumed to contain a program that can be 
loaded and executed. For example: 

FTN,B=OLIVER. Writes object code on file OLIVER. 

OLIVER. Calls for load and execution of OLIVER. 

Parameters can appear on the program call, depending on the object program. For instance, the FORTRAN 
Extended compiler produces object code that can process file names. The following program call substitutes 
files TAPE2 and TAPE3 for whatever file names are compiled into the object code. 

OLIVER,TAPE2,T APE3 . 
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The COBOL compiler, on the other hand, does not produce object code that can accept parameters on the pro- 
gram call. The reference manuals for the individual products describe any such capability. 

Any user program that can access the first 100 octal locations of the job field length can be written to accept 
program call parameters. Positioning of the file named on a program call is controlled by installation default. 
At most installations, rewind occurs automatically before loading. In a straightforward compile-and -execute job, 
the file LGO or its equivalent need not be rewound. 

When more than one program is written on LGO, however, manipulation of LGO might be required. If the first 
program is a main program and the second is a subroutine called by the main program, a single call for LGO 
rewinds the file, loads both programs, and executes. 

If the two programs are independent, however, execution stops at the end of the first object program. A second 
call to LGO rewinds the file, such that the first program executes a second time, rather than having the second 
program execute. The previous example job DECKA shows a deck structure with one file name that executes 
two independent programs with a cdntrol statement to rewind this file so that the second program overwrites the 
first. An alternative is example DECKB in which the second independent program is written to a separate file and 
executed by a call with the name of the file ABC. 



COMPILER AND ASSEMBLER CALLS 

The following names should be used on the program execution call statement to assemble or compile a user 
program. 



Source Language 


Ifn 


Source Language 


lfn 


FORTRAN Extended 


FTN. 


SYMPL 


SYMPL. 


COBOL Version 4 


COBOL. 


Sort/Merge 


SORTMRG 


COBOL Version 5 


COBOL5. 


PERT/TIME 


PERT66. 


ALGOL 


ALGOL. 


APT 


APT. 


ALGOL Editor 


ALGEDIT. 


QUERY UPDATE Version 2 


Q2. 


COMPASS 


COMPASS. 


QUERY UPDATE Version 3 


QU. 


SIMSCRIPT 


SIMS. 


FORM 


FORM. 


BASIC 


BASIC. 


Data Definition Language 


DDL. 



Parameters on the control statements are used for such functions as: 

Naming the file containing the program to be assembled or compiled (default name INPUT) 

Naming the file to which the program is to be translated in object code (default name LGO) 

Producing source language or object code listings of the program (listing options such as S in FORTRAN) 

Parameters for many products are the default I=INPUT, B=LGO, and L=OUTPUT. See the reference manual for 
a particular compiler for a full description of parameters that can appear on the control statement. When a com- 
piler or assembler call specifies INPUT as the name of the file containing the source program, the next unexecuted 
section of the job deck must contain the program. 
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EFFICIENT CONTROL STATEMENT ORDERING 

Placement of some control statements, particularly those that cause hardware devices to be assigned to a job, can 
affect the efficiency with which all jobs execute. Parameters on those statements can also affect job throughput. 

A REQUEST control statement for a magnetic tape assigns a tape drive unit to the job as soon as the tape is 
made ready and the operating system is aware of the tape location. The tape unit remains assigned to the job 
either until the job executes a control statement that releases the unit or the job terminates. 

The following examples presume a job compiles a FORTRAN Extended program and executes the program 
twice using different sets of data on individual tape volumes. 

An inefficient ordering of control statements is: 

INEFFICIENT.MT2 job statement indicates two tape units required. 

REQUEST,DATA,MT. ASSIGN 3456. 

REQUEST,DATA2,MT. ASSIGN 3457. 

FTN. 

LGO. 

LGO. 

The same operations performed more efficiently are: 

EFFIOENTJHT1. 

FTN. 

REQUEST,DATA,MT,VSN=3456,NORING. 

LGO. 

UNLOADJDATA. 

REQUEST,DATA2,MT,VSN=3457,NORJNG. 

LGO. 

RETURNJDATA2. 

The second job is more efficient in several ways: 

Only the number of tapes required at one time is indicated on the job statement, not the total required 
in all. Jobs with tape requirements are captured in a tape queue when they enter the system. They are 
not released to the input queue, and consequently cannot begin execution, until certain tape availability 
requirements are met. 

A tape is requested when it is required, not before. Since the compiler does not use the data tape, the 
tape is not requested until after compilation is complete. 

The VSN parameter on the REQUEST control statement permits the operating system to assign the mounted 
tape to the job without operator command. Without VSN information, the operator must inform the oper- 
ating system of the location of the tape. 

The tape unit is returned to the system when it is no longer needed, instead of having the job hold the unit 
until job termination. 

In general, control statement placement can affect job execution time whenever a magnetic tape or private device 
set is used. 
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DIRECTIVE SECTION 

Directives are control information that does not appear within the control statement section of a job deck. 
They are required by several of the utilities, including EDITLIB and COPYN, and by several common prod- 
ucts such as UPDATE and FORM. 

When directives specify instructions which will not fit on a single control statement, the programmer has 
the following options. 

Placing directives on a file and making the file available to the job before the directives are needed. 

Placing the directives within the job deck. 

The name of the file containing the directives must be specified in the call to the utility or product. The 
default file name for most calls is INPUT. 

When directives are part of a job deck, they must appear in a separate section. The deck must be struc- 
tured such that the directives are the next unprocessed section of the deck at the time the utility or 
product executes. 

DETAILED JOB FLOW THROUGH SYSTEM 

The following information describes the system procedures that occur as a job passes through the system. 
An understanding of this information is not required for system use. 

From the time a job is assigned to a control point and execution is completed, many other jobs are being 
executed. Each job is assigned a job descriptor table (JDT) ordinal when it is first assigned to a control 
point. If the scheduler routine swaps out the job (returns it to mass storage in its present state of execu- 
tion), the JDT ordinal maintains the identity of the job when the control point association is lost. A job can 
be swapped out by the scheduler when a job with higher priority enters the system or when the job is 
delayed waiting for a resource such as a disk pack. A job can also be rolled out, freeing central memory but 
retaining a control point, while awaiting operator action. The scheduler directs swapping and rolling, taking 
into consideration the relative needs of batch jobs and interactive jobs. When jobs are swapped or rolled 
into central memory, they resume execution at the point of interruption. 



EXAMPLE JOB 

The manner in which control statements establish user program handling is illustrated by following a sample 
job as it is processed. For example, consider a job to assemble and execute a program written in COMPASS, 
with the output to a line printer. The user gives the operator a tape to be used for output. In the sample 
job that follows, the tape has a label containing 1972 as the volume serial number. The job would be 
structured as illustrated in figure 2-2. 
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Terminates data 
and job deck 



Terminates 
source program 



Terminates 

control 

statements 




Data 



/LGO. 

/ request,tapei,mt,e,ring!' 
/compass. 

-/VSN(TAPE1=1972) 



/jOBNAME,MT1. 



COMPASS 
Program 



Control 
statements 



Figure 2-2. Sample COMPASS Job 

When the sample job is input through the card reader, the operating system calls a PP routine to translate the job 
statement, check the validity of its entries, and assign a priority to the job. Next the PP copies the job through 
a central memory input/output buffer onto mass storage. At this point, the operating system identifies the job 
by its file name JOBNA01 (from the job statement). 

When the job is in the input queue of jobs awaiting execution, it comes under control of a scheduling 
routine. The following factors are considered in assigning jobs to available control points: the priority 
entered with the job, available system resources such as central memory, direct access ECS, tape units, and 
the total time the job has been in the system. A job descriptor table ordinal is assigned to the job. This 
ordinal is used to identify the job while it is in execution regardless of whether it is in central memory 
or not. 

The job then waits for the scheduler to assign it to a control point. When a control point becomes available, 
the scheduler assigns the job and initializes the control point with pertinent information about the job. The 
system saves the assigned job name for later use. 
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The job file name is changed to INPUT and the file is positioned at the statement following the first 7/8/9 
card (the beginning of the user's program). The first control statements are read into a buffer within the 
related control point area in low core, and are ready for execution. As job output is created, it is written to 
a file named OUTPUT. 

Accounting processing, if selected by the installation, occurs as the first step of actual job execution. Account- 
ing information extracted from the job statement or the statement following it is validated and saved for later 
use hy the system. The accounting information defined by the system can include such items as name, account 
number, project number, etc. If accounting is not selected by the installation, as in this example, accounting 
information need not be present. 

After accounting processing, the system copies the BATCH system bulletin to the job OUTPUT file. If the 
installation has not specified BATCH system bulletin information, no information is written to the OUTPUT 
file. The installation can specify other standard procedures to be executed at this time. 

Upon completion of all standard procedures, job control is advanced to the second statement, COMPASS, 
which directs assembly of the user's program. The system requests the loader to load the COMPASS assembler 
into the field length. Control passes to COMPASS to assemble the next cards on the file INPUT and put the 
object program on the file LGO. The assembler stops when it reads a 7/8/9 card. [For assembly or compila- 
tion, the user can designate files other than INPUT as an input file and other than LGO as binary output by 
entries on the COMPASS control statement. However, unless such alternative files are named on the assembly 
or compilation card (the COMPASS statement in this case), INPUT and LGO are used by default.] COMPASS 
also writes a source language listing of the program onto a file named OUTPUT. At job termination OUTPUT 
is printed unless the user specifies otherwise. 

Control is then advanced to the next REQUEST statement. The VSN parameter provides the volume serial 
number for the tape label. The system automatically assigns the tape if it is mounted. (If the installation 
does not choose the automatic assignment feature, the REQUEST statement appears on the operator console, 
and the operator must assign the tape to the job manually.) Control proceeds to the next control statement, 
LGO. 

The LGO statement directs program execution. The loader loads the LGO file containing the user's program 
in object code into central memory and writes a map of this program onto the file OUTPUT. Library sub- 
programs required are loaded also. Control passes to the user's program for execution, input data is read 
from the next element of the INPUT file (user's data), and output is written on TAPE1 and OUTPUT. 

As each control statement is executed, it is copied onto the job and system dayfiles. Control statement pro- 
cessing stops when the first 7/8/9 card is encountered. NOS/BE writes job accounting information and job 
statistics on the dayfile and copies this file to OUTPUT, which then is detached from the control point. The 
name OUTPUT is changed to JOBNA01 (the assigned job name) and TAPE1 is released so that the tape unit 
can be available for another job. INPUT and LGO are cleared and released from NOS/BE control. All equip- 
ment associated with the job is released from control point n and assigned to control point 0, where it can 
be requested by other jobs. The control point area and field length in central memory are made available for 
other jobs. When a printer is available, JOBNA01, containing the assembly language program listing, load 
map, output, and dayfile, is printed. A generalized description of the job flow is shown in figure 2-3. 
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CONTROL 

POINT 

AREA 




CENTRAL MEMORY 



1 Job read into card reader 5 

2 Job read through buffer onto disk 6 

3 Job in mass storage input queue 7 

4 Job assigned control point; goes into execution 



Some output to a tape 
Job assigned to output queue 
Output to printer through 
buffer to printer 



Figure 2-3. Job Flow at Central Site 

EXAMPLES OF JOB DECK ARRANGEMENTS 

The order in which control statements are arranged depends upon the purpose of the job and the program it 
contains. The following examples illustrate typical arrangements. Automatic rewind before a load is assumed. 
1. JOBA(MTl) 

REQUEST(SALLY,MT,VSN=1 23456) 

SALLY. 

6/7/8/9 



JOBA requests a tape file named SALLY and loads and executes an object program from that file. 
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2. JOBB. 
FTN. 
LGO. 

7/8/9 

FORTRAN Extended Pro-am 

6/7/8/9 

JOBB, containing a FORTRAN Extended program on Hollerith cards, compiles, loads and executes that 
program. 

3. JOBC/T50. 
INPUT. 

7/8/9 

Program on Binary Cards 

6/7/8/9 

JOBC, containing a program on binary cards, loads and executes that program. 

4. JOBD. 
FTN. 
LGO. 
LGO. 

7/8/9 

FORTRAN Extended Program 

7/8/9. 

First Data record 

7/8/9 

Second Data record 

6/7/8/9 

JOBD compiles and executes a FORTRAN Extended program and executes this program with one set of 
data, and then with another. 

5. JOBE. 
ATTACH,MYLIB,ID=MINE. 
COBOL. 
REWIND.LGO. 
EDITLIB,USER. 

7/8/9 

COBOL program 

7/8/9 

LIBRARYOtYLIB.OLD) 

ADD(NEWPROG,LGO,AL=l) 

FINISH. 

6/7/8/9 

JOBE compiles a program and adds it to a user library named MYLIB. Directives required by the EDITLIB 
utility during library manipulation are the last section of the deck. 
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JOB TERMINATION DETAILS 

When a job is processed without error, normal termination activity begins upon reaching the end of the control 
statements or some form of EXIT control statement. First, execution time of the job is written onto the job 
dayfile and on the system dayfile. Then, the job dayfile is rewound and copied onto the file OUTPUT. Next, 
OUTPUT and any other files on mass storage designated for output, such as PUNCH or PUNCHB, are rewound 
and placed in the output queue. OUTPUT is designated for the printer, and PUNCH (Hollerith) and PUNCHB 
(binary) for the card punch by disposition codes. These files names are then changed to the job name and 
assigned to control point 0. 

The following files are treated as special cases. Unless the user overrides the default disposition of such 
files, they are designated for output at job termination and automatically assigned a specific disposition code. 

OUTPUT PUNCH FILMPR HARDPR PLOT 

PUNCHB FILMPL HARDPL P80C 

Files on magnetic tape are rewound (unloaded if the programmer requested save status) and released from the 
system. Permanent files are released from the job and returned to permanent file manager jurisdiction; private 
device sets are dismounted. All remaining files in central memory and mass storage associated with the job 
including INPUT, LGO, and the job dayfile, are cleared and released. The job is released from the control 
point area. 

All hardware devices assigned to a job are assigned to control point 0, so they can be reassigned to other jobs. 
At this point, only files in the output queue relating to the job remain. When an output device of the type 
requested by the file's disposition code is free, the file is output through that device. 



ABNORMAL TERMINATION 

When a fatal error occurs, the operating system sets a flag indicating the error. If the error has been previously 
identified in the current job step by a call to RECOVR, control is returned to the user program for processing. 
Otherwise error processing continues. 

A diagnostic message that reflects the reason for abnormal termination is written to the job dayfile. t A standard 
abnormal termination dump then occurs. The dump appears on the file OUTPUT with the heading DMPX. 
This dump shows the contents of the exchange package for the job, the contents of central processor registers, 
and the contents of words before and after the location at which the program stopped. See the DMP control 
statement for a description of the dump output. 

The operating system then clears the error flag and searches the control statements for an EXIT statement. 
Depending on the parameter of EXIT and the type of error that occurred, processing might resume with the 
first control statement after the EXIT statement. See the EXIT control statement for a description of the 
different error conditions and EXIT parameters. If no EXIT statement exists, the job terminates as previously 
described for normal job termination. 



fWhen a file is designated for output (output, punch, and so forth), the system finishes the write operation 
in progress at the time of termination. 
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OPERATOR COMMAND TERMINATION 

When the operator types in a DROP commands the job terminates prematurely. End-of-job procedures are 
initiated as described under Abnormal Termination. 

When the operator types in a KILL command, the job terminates prematurely. All files associated with the 
job, including the OUTPUT file, are dropped regardless of name or disposition. Permanent files are treated 
the same as for normal termination. The programmer does not receive a dayfile listing. 

When the operator enters a RERUN command, the job is terminated, and its INPUT file is returned to the 
input queue so that it can be run later. The OUTPUT file is dropped, and a new output file is created. The 
job dayfile is copied to the new output file called a pre-output file and becomes the OUTPUT file when the 
job is run again. The OUTPUT file for the rerun job will contain the dayfile from the previous partial run 
of the job and the output and dayfile from the complete run of the job. 

Permanent files and mounted private device sets for a rerun job are treated as for normal termination. All 
other files, regardless of name or disposition, are dropped. 

In some cases, a job might perform a function which would make it impossible to restore conditions to their 
initial state before the job was run. For example, if a job writes on an existing permanent file, that informa- 
tion cannot be erased. When such a job is rerun, results are unpredictable. To avoid this condition, the sys- 
tem will set a no-rerun flag in the control point area to reject a RERUN type-in by the operator. The no- 
rerun flag will be set when the job has performed a catalog, purge, alter, rename, or extend of a permanent 
file, modified a permanent file, or added or deleted a member of a device set. 

Should a job be caught at a control point during a deadstart recovery, it is either dropped or rerun 
depending upon the no-rerun flag. If possible, the job is rerun; however, if the flag indicates no rerun, the 
job will be dropped and an appropriate message added to its dayfile. Any job swapped out during a dead- 
start recovery will be given a message indicating that recovery was performed. 



JOB DAYFILE 

The last item of the file OUTPUT from any job is the job dayfile. It gives a history of job execution. Any 
program or job that terminates abnormally produces dayfile messages identifying a fatal error. Normal job com- 
pletion is indicated by the absence of fatal error messages. 

Each control statement that is called to execution is listed in the dayfile. System response to a control state- 
ment might follow. The dayfile shows, for example, the VSN of a scratch tape assigned. Such information 
might be needed as input in another job using that tape. The NOS/BE Diagnostic Handbook gives the meaning 
of status and error messages originating in the operating system. Messages that originate from a member of 
the product set are explained in the individual product reference manual. 
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The programmer can cause information to be sent to the job dayfile by using the COMMENT control statement 
or the MESSAGE macro in a COMPASS program. Several other language processors also allow messages to be 
sent to the operator or to the dayfile. 

Figure 2-4 shows a typical dayfile. 

mfi system level mm/dd/yy 

16.42. 19.BASIC60 FROM 

16.42. 20.IP 08000192 HOROS - FILE INPUT • OC 00 
16.42.28.BASIC31,T40«P2,MT1. 
16 .42. 26 .REQUEST (COMPILE, *Q) 

16.42.27.REQUEST(0LDPL*E,HY,VS!I«4174«N0RING> 
16.43.5Q.t MT30 ASSIGNED) 
16.M».36,UPOATEfO,D,6.»==) 

16.44 .38.MT30 VOLUME SERIAL NUMBER IS 00417*1 
16.45.58. UPOATE COMPLETE. 
16.45.59.R0UTE(C0MPILE«OC=IN> 
16.45.59.UNLCA0 fOLOPLI 

16.46.06.OP 00001920 MOR0S - FILE OUTPUT , OC 40 
16.46.07.MS 3584 HOROS ( 3584 MAX USEOI 

16.46.07.CPA 2.171 SEC. 2.171 AOJ. 

16.46.87.CP8 1.164 SEC. 1.164 AOJ. 

16. 46. 07. IO 14.143 SEC. 14.143 AOJ. 

16.46. 07. CM 285.607 KHS. 17.444 AOJ. 

16.46.07.SS 34.923 

16.46. 07.PP 34.835 SEC. DATE mm/dd/yy 

16.46.07.EJ EN0 OF JOB* •» 

Figure 2-4. Sample Dayfile 

The system header identifies the system on which the job executed. Installations might change the information 
given on this line. 

mfi Mainframe identifier. 

system Operating system level. 

mm/dd/yy Date the operating system was built; time and type of deadstart recovery appears if 
recovery has occurred. 

The first line after the system header gives the name of the job as modified by the operating system to make 
the name unique among all jobs and the job origin in the following format. 

jobname FROM s s s / t t 

jobname Unique name assigned by the system 

s s s Source mainframe ID 

t t Terminal ID 
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The lines giving statistics about the input and output files have the following format. 
IP nnnnnnnn WORDS - FILE Ifn, DC dc 



or 



OP nnnnnnnn WORDS - FILE lfn, DC dc 



IP Indicates that this message refers to an input file. 

OP Indicates that this message refers to an output file. 

rmimftfiim Decimal number 01 worus in trie iiie. 

lfn Logical file name. 

dc Disposition code of an output file. DC 40 is for print on any printer. See the DISPOSE 

macro for a list of disposition codes. 

Accounting messages are added to the dayfile at the end of the job and each time a SUMMARY control state- 
ment executes. Figure 2-5 shows sample accounting messages. 

MS aaaaaaaa WORDS (bbbbbbbb MAX WORDS USED) 
CPAccccccc.ccc SEC. dddddddd . ddd ADJ. 
CPBccccccc.ccc SEC. dddddddd. ddd ADJ. 
IOeeeeeeee.eee SEC. ffffffff.fff ADJ. 
CMgggggggg.ggg KWS. hhhhhhhh.hhh ADJ. 
ECiiiiiiii.iii KWS. jjjjjjjj.jjj ADJ. 
SS kkkkkkkk.kkk ADJ. 

PPr uuimmm mmm.mmm SEC. DATE rnm/dd/yy 

Figure 2-5. Sample Accounting Messages 
All values are in decimal, with leading zeros omitted: 



aaaaaaaa 



bbbbbbbb 

ccccccccccc 

dddddddd.ddd 

eeeeeeee.eee 

ffffffff.fff 



Mass storage currently used by the job, not including the INPUT file nor any 
permanent files the job attaches. Newly created permanent files are included in 
the word count. This message is issued only if the job has executed a LIMIT 
control statement or if the installation has established a mass storage limit. 
The decimal value in words is computed by multiplying the number of record 
blocks used by the number of words in a record block. 

Maximum mass storage used by the job. Otherwise, the same as aa aaaaa a . 

Central processor time; dual processors are reported separately. 

Adjusted central processor time for each processor. The time is multiplied by 
an installation selected weighting constant. 

Input/output time. 

Adjusted input/output time. The time is multiplied by an installation selected 
weighting constant. 
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2-17 



gggggggg-ggg 



hhhhhhhh.hhh 



liiimi.m 



JJJJJJJJ-JJJ 
kkkkkkkk.kkk 



Central memory kilo-word seconds. This value indicates central processor usage, 
and is a sum of terms, each term computed as follows: 

Central processor time and 10 time are weighted, to compensate for over- 
lapped 10 processing, and then added together. This sum is multiplied 
by central memory field length divided by 1000 octal. 

Each time central memory field length changes, a new term is computed. 
Thus, the number of terms summed is the same as the number of times 
central memory field length changes during job execution. 

Adjusted central memory kilo-word seconds. Statistic is the same as control 
memory kilo-word seconds with weighting factors selected by the installation. 

Extended core storage kilo-word seconds. This value is computed in the same 
way central memory kilo-word seconds are computed, except ECS field length 
divided by 1000 octal is used. 

ECS kilo-word seconds adjusted by installation selected weighting factors. 

System seconds. The sum of the adjusted values of central processor time, 10 
time, central memory kilo-word seconds, and ECS kilo-word seconds. 



mmmmmmmm.mmrn Peripheral processor time. 



mm/dd/yy 



Date job was printed. 
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FILE CONCEPTS AND STRUCTURE 



A file is defined as a set of information that begins at beginning-of-infonnation, ends at end-of-information, 
and has a iogicai rile name. 

This section summarizes job responsibilities for files and the devices on which they reside and introduces the 
control statements used to process different types of files. Structure of files within the system is also defined. 

GENERAL Fltf USAGE 

A job is responsible for: 

Specifying the logical file name by which a file is known during the job 
Assigning the file to a particular device, if necessary 
Disposing of the file if it is to be preserved when the job ends 

NAMING FILES 

Each file associated with a job is known by its logical file name. The operating system associates two files with 
each job; one with the logical file name INPUT and another with the logical file name OUTPUT. All other logical 
file names must be specified by the job. The logical file name is valid only for the duration of the job. The name 
is not part of the file itself; it is not written in the label of a file on tape, and it is not a part of the permanent 
file table information. 

Each logical file name must be unique within a job and must not duplicate the name of a multi-file tape set 
associated with the job. Logical file names are one through seven letters or digits and must begin with a 
letter. 

RESERVED LOGICAL FILE NAMES 

Logical file names that begin with ZZZZZ are reserved for use by the system. User jobs are not prevented 
from creating or reading files with the name ZZZZZxx, but use of these files might adversely affect the job. 

SPECIAL-NAMED FILES 

Special-named files are those with an inherent set of characteristics and disposition. The following paragraphs 
contain descriptions of some of these files. 
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INPUT 

INPUT is the name of the file with the images of the job deck. Each separator card in the deck, or its 
logical equivalent, is an end-of-partition when processed by system routines in the operating system or the 
standard compilers. The separator cards trigger end-of-file processing. Each card image is a separate record 
to compiler and assembler programs. 



OUTPUT 

Every job has a file of the name OUTPUT associated with it. OUTPUT is created by the operating system 
on a queue device. The operating system writes the job dayfile to this file when the job terminates. Other 
information that might appear on OUTPUT as a result of processing by system routines is: 

Source program listing produced by compiler 

Object listings requested by compiler call in the job 

Diagnostics or error messages produced during compilation 

Results generated during program execution 

Exchange package dump generated by the operating system when a program aborts during execution 

OUTPUT always is printed or otherwise associated with a remote terminal when a job ends. The job can 
rewind OUTPUT and overwrite existing data, or it can evict all data with a DISPOSE or ROUTE control 
statement. However, it cannot prevent the job dayfile from being printed at batch job termination. 

OUTPUT is a print file with a maximum line length of 137 characters. The first character is the carriage 
control character which must be supplied by any user program that writes to OUTPUT. System routines 
supply the carriage control as needed. The remaining 136 characters of the line can be printed. Some 
system routines have the ability to format OUTPUT for Teletype device processing with a line length less 
than 136 characters. 

Any file copied to OUTPUT is printed at the end of the job. If the file does not have carriage control 
characters at the beginning of each line, the COPYSBF utility should be used to shift each line one character 
to the right and insert a leading blank for single spacing control. 



PUNCH 

PUNCH is a file with an associated disposition code. Any data written to the file is assumed to be display 
code. The file is punched in Hollerith format at the end of the job. 



PUNCHB 

PUNCHB is a file of binary information. Any data written to it is assumed to be binary. The file is punched 
in standard binary format at the end of the job. Any assembled or compiled program that is written on 
PUNCHB is an object program that can be loaded and executed by specifying the name of the file on which 
the program resides. 



3-2 60493800 E 



P80C 

P80C is a file of binary information. Any data written to it is assumed to be binary. The file is punched in 
free-form binary format at the end of the job. They are used only in special circumstances. 



OTHER SPECIAL-NAMED FILES 

Files with names FILMPR, FILMPL, HARDPR, HARDPL, and PLOT also have an associated disposition. Tile 
operating system defines codes for these files, but does not supply the routines needed to drive the associated 
hardcopy or microfilm devices. Only some installations have these devices. 

ASSIGNING FILES TO A JOB 

Before a file can be read or written, the operating system must be informed of the device on which the file 
resides. If a file is not associated with a specific device before it is created, it is written on a public mass 
storage device at the time an executing program calls for file open. The job does not need to inform the 
system of the residence of files on mass storage unless the file has special characteristics. 

Files that exist only for the duration of the job are known as scratch files. They are created as they are 
needed and destroyed when the job terminates. The INPUT file for the job, temporary files written by the 
compilers during compilation, and some user files are useful only for a short time. Scratch files are created 
on mass storage as the file is referenced. They need not be specifically requested. 

The devices on which rotating mass storage files are written are divided into two classes, public device sets 
and private device sets. The programmer determines the device on which a file resides by the use or absence 
of the REQUEST control statement and the SETNAME control statement or parameter. Public and private 
device sets are described later in this section. 

Situations in which it is necessary to inform the operating system of the device on which a file is to be 
created include those when: 

A file is to be subsequently declared a permanent file with a CATALOG statement. Such files must be 
referenced on a REQUEST control statement with a *PF parameter. 

A file is to be released to the output queue for print or punch processing. Unless the file name is 
OUTPUT, PUNCH, PUNCHB, or P80C, a REQUEST control statement with a *Q parameter is required. 

A file is on magnetic tape. All tape files require a REQUEST or LABEL control statement that de- 
scribes the characteristics of the tape data format, label, and recording mode. 

A file is to reside on a private device set. A MOUNT control statement is required to associate the 
private device set with the job. Subsequently, each file that is to reside on the device set must be 
referenced in a REQUEST control statement specifying the device set name. 
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Existing files that must be specifically associated with the job include the following. 

All tape files Tape files require a REQUEST or LABEL control statement. 

Permanent files Permanent files are associated with a job through an ATTACH or GETPF 

control statement. 

Private device set files Permanent files are attached with an ATTACH control statement that 

names the device set. 

The file INPUT and all other special-named files described are assigned by the operating system to a mass 
storage device designated for input and output queue files. 

DISPOSING OF FILES AND EQUIPMENT 

Temporary or permanent status is controlled by the programmer. All files created on mass storage are 
temporary files that disappear when the job terminates, unless the job includes steps to preserve the file. A 
file can be preserved on mass storage or on external media by transferring it to printed pages, punched cards, 
or magnetic tape. 

Files are preserved in printed or punch card form when they are assigned a disposition code that results in 
processing by the line printer or card punch. Disposition codes are described in DISPOSE and ROUTE control 
statements and macros, and Special-Named Files. 

Files are preserved on mass storage by cataloging them as permanent files. Permanent files are explained later 
in this section. 

Normally, all files assigned to a job are retained by that job until termination. When the files reside on non- 
allocatable devices such as magnetic tapes, both the file and the hardware device are unavailable to other 
portions of the system for the duration of the entire job even though the file is in process for only a short 
part of the job. 

When DISPOSE, ROUTE, UNLOAD, or RETURN is used, files can be released before job termination, making 
both the logical file name and the resident device available for other uses. Files named in UNLOAD or 
RETURN are unavailable for the remainder of the job. An OPEN macro issued later in the job creates 
another file. 

New files to be retained between jobs as permanent files on mass storage must be cataloged as permanent files 
before the job ends. Existing permanent files return to permanent file manager jurisdiction when they are 
referenced in either an UNLOAD or RETURN control statement or macro. They are no longer available to 
the job until referenced in a subsequent ATTACH. 

FILE STRUCTURE 

All files on rotating mass storage are implemented through software conventions known as system-logical-records 
and physical record units. These conventions are also applicable to magnetic tape in SI format and card files, 
although the physical representations of these files are not precisely the same as for mass storage files. 
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The following paragraphs describe the structure of files produced by the system. They define terms used 
throughout this manual, such as: 

System-logical-record (equivalent to SCOPE logical records) 

Level terminators 

Physical record units 

Partitions 

SYSTEM-LOGICAL-RECORDS AND PHYSICAL RECORD UNITS 

A physical record unit (PRU) is the amount of information that can be accessed in a single read or write 
operation for a given device. On rotating mass storage, a PRU is equivalent to the contents of 64 central 
memory words. 

One write operation from a higher level language program usually does not result in the creation of a single 
PRU, however. Routines called by compiler programs block program data in a central memory buffer during 
program execution, so that one record generated by the program can become part of a single PRU or a string 
of PRUs containing records from write calls issued by a program. 

System-logical-records are written as one or more PRUs, the last of which is a short PRU or a zero-length 
PRU containing a record terminating marker. The terms short PRU and zero-length PRU refer to the amount 
of valid user data within the PRU, not to the physical size of the PRU. 

A short PRU contains fewer than 64 words of user data followed by a system-supplied record terminator 
at the end of user data. 

A zero-length PRU contains a system-supplied record terminator, but does not contain any user data. 

When user data does not fill the last PRU needed to write a system-logical-record, the record terminator is 
appended to the data and the remaining space in the PRU is ignored. If the record terminator cannot be 
accommodated in the last PRU with data, a zero-length PRU is created to hold the record terminator. A 
zero-length PRU has only system information. 

The record terminator for a system-logical-record contains a level number of through 17g to indicate the 
relation of that record to other records in the file. The lowest level is 0; it is associated with a single system- 
logical-record. A higher level number defines a set of records that begins immediately after the last record of 
that level and continues through all system-logical-records of a lower level number until the end of a record 
with that level or a higher level number is encountered. 

A level number of 17g establishes a partition boundary for the file. Level 17g always is recorded in a zero- 
length PRU. Level 17g records are written in response to a COMPASS macro WRITEF and to compiler pro- 
gram requests to close a file or to write an end-of-fiie. When a file has only one partition, the level 17g 
terminator marks the logical end of the file. However, a file can contain any number of partitions defined 
by level 17g before the physical end of the file. 
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The following lists summarize rotating mass storage file structure. 
Physical Structure 



Logical Interpretation 



One or more PRUs terminated by a short or 
zero-length PRU of level through 16g 

One or more PRUs terminated by a zero- 
length PRU of level 17g 

End of mass storage allocated in system 
RBT table 



System-logical-record of level indicated; sets 
end-of-record bits in system tables 

Partition; sets end-of-partition bits in system 
tables; end-of-file exits occur 

End-of-information; sets end-of-information 
bits, if any, in system tables or sets 
end-of-partition bits 



System-logical-records with particular level numbers can be accessed through SKIPF, SKIPB, COPYBF, and 
COPYCF control statements and through the COMPASS macros SKIPF, SKIPB, and READSKP. 

A system-logical-record of level 1 6g has special meaning to the checkpoint/restart feature of the operating 
system. Consequently, level 16g should not be specified in user programs that might be checkpointed. 

Sequential files are written directly in system-logical-record format. Random files are implemented through a 
higher-level structure imposed upon the system-logical-records. Two types of higher level structures are: 

Name/number index random files using operating system routines described later in this section 

CDC CYBER Record Manager files using the capabilities of the CDC CYBER Record Manager. These 
are described in the CDC CYBER Record Manager manuals. 



FILE DIVISIONS 

The physical representation of beginning-of-information and end-of-information depends on the storage device 
as follows: 



Device 

Card deck 

Labeled magnetic tape file 
Unlabeled SI format tape 



Mass storage file 



Beginning-of-Information 

Start of first card in deck 

Start of data after labels 
Start of data 



Unlabeled S or L format tape Load point 



Start of data in system table 



End-of-information 

Card with 6/7/8/9 multiple-punched 
in column 1 

Start of EOF label 

Start of EOF label 

Undefined 

End of data designated in system 
table 



ECS 



Start of data in system table 



End of data designated in system 
table 



3-6 
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The operating system recognizes these divisions within a file: 

Partitions are divisions within a file. On a mass storage file or a tape in SI format, a partition is 
synonymous with a system-logical-record of level 17g. On an S or L tape, a partition is indicated by 
a tape mark. All files have at least one partition. 

System-logical-records of level through 16g are defined by the operating system on SI format magnetic 
tape and rotating mass storage. These records are divisions of a partition. 

Zero-byte terminated records are divisions within a system-logical-record or within a partition of an S or 
L tape. These records are the representation of a single print line or single punch card processed by 
the JANUS routine of the operating system. 

Tapes in S or L format do not have system-logical-records. For some purposes such as copy of a coded 
record, the operating system recognizes each physical record recorded on the tape as a single record that 
is logically equivalent to a system-logical-record. 

The operating system recognizes only the previous divisions. Individual products that are supported by the 
operating system have different definitions of the term record. For instance, CDC CYBER Record Manager 
defines eight types of records, only one of which (S type) is equivalent to a system-logical-record. CDC 
CYBER Record Manager uses a slightly different definition for some record types. From a program stand- 
point, a record is usually associated with a single read or write request. 

DEVICE SETS 

All rotating mass storage devices attached to a system are grouped into device sets. One device in a set is 
designated as the master; it holds all tables related to the set. Each device in the system belongs to one and 
only one set. Two types of device sets exist: 

A public device set is always available to all jobs. It is used by the system to hold system files, 
permanent files, and special-named files such as INPUT and OUTPUT. 

Unless a job requests that a file be written to another device, files are assigned to a public scratch 
device. 

A private device set is available to a job only by specific request. Depending on the installation, private 
device sets may or may not be physically mounted at all times. Files to be preserved on private device 
sets should be made permanent on that set. Private device sets can be used simultaneously by jobs that 
have mounted the device set. 

Device sets can have a varying number of members within the set. Some device sets might have only a single 
device associated with them. The single device in such a set is both the master device for the set and the 
only member of the set. The set is identified by the set name. The individual members of the set are 
identified by a volume serial number. 

A job need not know the volume serial numbers of members of device sets, however. Parameters on the 
REQUEST control statement that assigns a file to a device allow a member to be identified explicitly by its 
volume serial number or implicitly by its attributes. 
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Attributes are assigned when a device set is created. The attributes of most concern to applications pro- 
grammers are: 

Attribute Significance 

Public permanent file default set Permanent files reside on this public set unless another 

set is requested. 

Queue set Files with the name INPUT, OUTPUT, or any other 

special name reside on this set. Any file to be named in 
a ROUTE or DISPOSE control statement must reside on 
this set. 

Permanent file device A member of a public or private device set can hold 

permanent files when the device has the permanent file 
attribute. 

Queue device A device on which queue files can reside if the device is 

a member of the queue set. 

Master device The master device of each private device set must be 

known before the set can be accessed by a job. 
A file on a rotating mass storage device can be of arbitrary length, and it can be segmented over more than 
one device. The data is recorded in a logical sequence of record blocks which can be arbitrarily scattered 
about the disk surface. The operating system maintains a central memory table for each file, called the 
record block table (RBT), in which the sequence of allocated record blocks is defined. The end-of- 
information position and end-of-volume position are also defined in the RBT. 

PUBLIC DEVICE SET USAGE 

Public device sets are the default. Unless a private device set is requested, mass storage files are on public 
devices. All public device sets are available to a job at all times. The MOUNT and DSMOUNT control 
statements applicable to private device sets are not needed for public device sets and will be ignored if 
encountered. 

The REQUEST control statement assigns a file to a public device. Normally, a REQUEST is not needed 
except for the following files. 

Files that subsequently will be cataloged as permanent files 

Files that have a disposition code for printing or punching 

Files that are to reside on a particular public device set or member 

The *PF parameter of REQUEST assigns the file to a permanent file device. 

The *Q parameter of REQUEST assigns the file to a queue device. A file cannot be referenced by a ROUTF 
control statement or DISPOSE control statement unless it resides on a queue device. 

Files named INPUT, OUTPUT, PUNCH, PUNCHB, P80C or any other special-named files always reside on 
public devices by default. A REQUEST with a *Q parameter is not needed for special-named files. 
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PRIVATE DEVICE SET USAGE 

A private device set is established by the following steps. 

1. Each pack to be included in the set is blank-labeled with the LABELMS utility. 

2. The master device is established by an ADDSET control statement that defines the name of the set, 
the volume serial number of the master device, the maximum number of packs that can exist in the 
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universal permissions, the pubUc password, and the default file retention period for this set. The 
master device need not be a permanent file device, but at least one member device should be 
designated as a permanent file device. 

3. Members of the device set are added by additional ADDSET control statements that specify the 
device set name, the master device volume serial number (VSN), and the volume serial number for 
the pack being added. Additional members are not required; the master device can be the only 
pack in the device set. All ADDSET control statements can define the permanent file attribute for 
the device being added. 

Since tables relating to all packs that are subsequently added to the set reside on the master device, the 
master device must be available each time a pack is added to or deleted from the device set and must be 
available each time any file is accessed from the set. The master device is also required when any of the 
permanent file utilities (AUDIT, DUMPF, LOADPF, or TRANSPF) references a private device set. 

To access a file existing on the device set or to create a file on the device set, the job must perform the 
following steps. 

1. The master device must be associated with the job by a MOUNT control statement. Since private 
device sets can be used by many jobs at- the same time, the device might already be physically 
available. If not, the operator must make the master device available. 

2. Any permanent file to be attached must be identified as a file on that particular set. The 
SETNAME control statement can establish the set name prior to the attach request, or the 
SN=setname parameter can be used on the ATTACH control statement. 

3. The REQUEST control statement assigns a file to a private device. In addition, all files to be 
created on the device set must be associated with the device set by a REQUEST control statement. 
An SN=setname parameter explicitly names the set; an SN parameter implicitly names the set 
specified in the last SETNAME control statement. 

Once the job has processed the files associated with the device, the device set should be disassociated from the 
job by execution of a DSMOUNT control statement. Execution of DSMOUNT might free a disk drive for 
other packs before the job ends, and thereby increase overall system throughput. If the job omits DSMOUNT, 
the system disassociates the device set from the job during end-of-job processing. 

The REQUEST control statement is required to assign a file to a private device set. The SN=setname or SN 
parameter establishes the name of the set. The VSN parameter can specify a particular member of the set. 
The *PF parameter can be used to ensure that the file resides on a permanent file device. 

The SETNAME control statement can be executed before any files are requested. SETNAME can establish 
the device set to which all subsequent ATTACH control statements are directed. This eliminates the need for 
an SN=setname parameter on each individual ATTACH control statement. It also defines the set to which 
REQUEST control statements with SN parameters are directed. 
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PRIVATE DEVICE SET EXAMPLES 

1. NEW DEVICE. 

LABELMS(DT=AY) PLEASE USE PACK 844A 

LABELMS. PLEASE USE PACK 844B 

ADDSET(VSN=844A,MP=844A,SN=MORE,*PF ) UV=MYUNIV,UP=C,PB=MYPUBLIC,FR=360) 

ADDSET(MP=844A,VSN=844B,SN=MORE,*PF) 

6/7/8/9 

This job creates a device set with two members. 

2. SUBSTITUTE. 
MOUNT(SN=MORE,VSN=844A) 
DELSET(MP=844A,SN=MORE,VSN=844B) 
MOUNT(SN=OTHER,VSN=l 23) 
ADDSET(VSN=844B,SN=OTHER,MP= 1 23,*PF) 
6/7/8/9 

This job deletes a pack from one device set and adds it to another. 

3. FIX UP. 

PAUSE. OPERATOR PLEASE ENSURE SN=MORE, VSN=844A IS ON AN RMS DRIVE. 
RECOVER(SN=MORE,VSN=844A) 

6/7/8/9 

This job runs a RECOVER on device set MORE, assuming the master device is physically on a disk drive 

4. SET. 

MOUNT(VSN=844A,SN=MORE) Mounts master device. 

REQUEST(TAPE5,*PF,SN=MORE) 

FTN. 

LGO. 

CATALOG(TAPE5,PERMANENT,ID=FRIEND) 

7/8/9 

FORTRAN program that creates TAPE5 

7/8/9 

data cards for FORTRAN program 

6/7/8/9 

This jobs makes a permanent file on the device set MORE. 

5. USE A SET. 

MOUNT(VSN=844A,SN=MORE) Mounts the master device. 
SETNAME(MORE) 

ATTACH(A,PERMANENT,ID=FRIEND) Taken from device set MORE by default. 

REQUEST(TAPE6,*PF) Assigned to public device since no SN parameter. 
COPY(A,TAPE6) 

CATALOG(TAPE6,PERMANENT,ID=FRIEND) Makes file permanent on the permanent file default set. 
FTN. 

REQUEST(TAPE5,*PF,SN) Assigned to device set MORE as SN is specified but not 

equivalenced. 

LGO. Job uses data and file TAPE6 to create file TAPE5. 

CATALOG(TAPE5,PERMFILE,ID=FRIEND) 

7/8/9 

FORTRAN program 

7/8/9 

data 

6/7/8/9 
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Permanent file PERMANENT is copied from device set MORE to the public device and recataloged with 
the same permanent file name and owner ID. A new permanent file is created and cataloged on device 
set MORE. 

TWO SETS. 

MOUNT(SN=OTHER,VSN=123) Mounts master device, 

MOUNT(VSN=844A,SN=MORE) Mounts master device. 

SETNAME(MORE) 

ATTACH(TAPE5 i PERMFILE ; ID=FRIEND) File is taken from device set MORE because of pre- 

ceding SETNAME. 

REQUEST(A,*PF,SN=OTHER) File directed to device set OTHER since explicitly 

requested. 

COPY(TAPE5,A) 

FTN. 

LGO. FORTRAN job creates file TAPE6 on system device as 

no REQUEST card used. 

COPY(TAPE6,A) 

CATALOG(AJ , ERM,ID=FRIEND) 

7/8/9 

FORTRAN program that creates TAPE6 

7/8/9 

data cards 

6/7/8/9 

Permanent file PERMFILE is attached from device set MORE and copied to device set OTHER. A new 
file is created on a system device and copied to the same file on device set OTHER. Then the file on 
device set OTHER is made permanent. 



OPERATING SYSTEM RANDOM FILES 

The term random denotes several different concepts, depending on the context in which the word is used. 

From a hardware standpoint, random refers to a device. All rotating mass storage devices and ECS are random 
access devices. Any physical address on the disk or ECS is read when the hardware driver receives a request 
for information at that address. This is in contrast to a sequential device, such as a card reader or tape, in 
which a card or tape block can be read only in the physical order in which it was written. Files written to 
random access devices can, but need not, have random structure. 

From an applications programmer standpoint, random refers to a file structure and to the means of accessing 
records in a file. CDC CYBER Record Manager and compiler products provide several different random access 
file structures in which each record has a key that uniquely identifies the record. The program can access any 
record by specifying its key, without considering the records that physically exist before or after that record. 
To the operating system, CDC CYBER Record Manager files with random organization are sequential files. 

From an operating system standpoint, random refers to the means by which the operating system receives 
input/output address information. A file on a rotating mass storage device is a random file only when the 
random bit is set in the file environment table (FET) which controls all file input/output. When the random 
bit is set and a write is issued, the system writes a record to the device, then returns address information to 
the FET. The program is responsible for preserving the information returned and for respecifying that infor- 
mation when the associated record is to be read. See Record Request/Return Information of the FET in 
section 6 for additional details. 
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A COMPASS programmer has the option of providing indexing routines for files in which the random bit is set, 
or of using the operating system supplied indexing routines. These routines create an index in which records 
are identified by name or by number of the entry within the index. 

| References to random or indexed files in sections 6 and 7 assume the name/number index structure described 
below. No other random, indexed, or random indexed file structures are recognized by the operating system. 

For information about the random file structures available through CDC CYBER Record Manager or various 
languages, see the reference manuals for those products or languages. 

NAME/NUMBER INDEX FILES 

Name/number indexed files can be created, read, written, and rewritten using the COMPASS macros OPEN, 
CLOSE, READIN, WRITOUT, WRITIN, and WRITER. Management of a single index level is provided 
through macros OPEN and CLOSE. 

Each file has an associated index. The index contains a relative PRU position for each system-logical-record 
in the file. The file beginning is equivalent to the start of the record associated with the first index entry. 
The file end is equivalent to the end of the record associated with the last index entry. Any record can be 
read by identifying it in the index without the need to skip records from some beginning file position. 

If a random file is to be saved, the file index must be written as the last logical record on the file. A user 
can write the index or call the COMPASS macro CLOSE or CLOSE/UNLOAD to write the index. CLOSE 
automatically writes out an index for a random file if the file contents were changed by a write with the 
FET random bit set. A permanent file must also have EXTEND permission before the index can be written. 

The first word in the index determines how the records are referenced. The index is generated through the 
WRITOUT macro. A positive non-zero value indicates reference must be by number; a negative value indicates 
reference can be by name or number. Number index entries are one word; name index entries are two words. 
The number of a record is equal to the relative position of the index entry for that record; the first entry in 
the index points to record 1, the second to record 2, etc. If a name index is used, the record name can be 
1 to 7 letters and digits. The value of index word 1 is determined when the first record is written. The 
formats of index entries are shown below. 
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The smallest unit of information that can be indexed is a system-logical-record. Each system-logieal-record 
must begin in a new PRU. For the most economical index, data record length should be equal to an integral 
tUs minus one word. 



USER-DEFINED INDEX FILES 

Single-level name/number indexed files can be created and maintained using system macros READIN, WRITOUT, 
OPEN, and CLOSE. Data record management at any level lower than a system-logicai-record falls to the user. 

READIN/WRITOUT can be used to create and maintain index contents during program execution without 
using OPEN/CLOSE to manage the index records. The user must manage his index records. They could be 
kept on a separate file, for example. 

Multi-level name/number indexed files can be created and maintained using READIN/WRITOUT and system 
macros OPEN and CLOSE plus a user generated sub-index management routine. A master index record con- 
tains addresses of sub-index records interspersed throughout the file. The master index record is processed 
by OPEN/CLOSE as is a single-level index record. The user routine needs to ensure that READIN/WRITOUT 
references the correct index or sub-index block. 

Other index formats can be defined by supplying a user routine to format and retrieve record names and mass 
storage addresses. Mass storage addresses can be computed on files containing fixed length records, provided 
the file is not ECS resident, since the addresses are in the form of a relative PRU count and the PRU size is 
fixed. 

PERMANENT FILES 

A permanent file is a rotating mass storage file cataloged by the system, so that its location and identification 
are always known to the system. Frequently used programs, subprograms, and data bases are immediately 
available to requesting jobs without operator intervention. Permanent files cannot be destroyed accidentally 
,},.,;„„ ««r m ~i gwotot" nnera+inn inrliiHino normal deadstart. Thev are orotected by the system from unautho- 
rized access according to the privacy controls specified when they are created. 

Any file associated with a job, regardless of mode or content, which resides on a permanent file device, can be 
made permanent at the option of the user. Unless the user explicitly requests the system to catalog a file, it 
is not made permanent. 

Files to be made permanent should be created on devices designated for permanent files. Files can be made 
permanent on either a public device set or a private device set. 

Privacy in permanent files is intended to minimize software interference by thwarting threats to user files 
from non-authorized central processor programs. The permanent file system offers a standard set of privacy 
controls. If an installation requires a different kind of protection, a privacy procedure can be defined to 
replace the standard. 

In addition to normal system protection, the individual file owner can prevent unauthorized access to his 
permanent file. The owner can stipulate, in cataloging a file, the degree to which the file is to be protected 
from read, write, and rewrite access. Once a file is cataloged, it cannot be used by any job unless the 
necessary passwords are given when a request is made to attach the file. 
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Permanent files are processed by the portion of the operating system known as the permanent file manager. 
| The permanent file manager routines create and maintain the permanent file directory and catalog. The 

permanent file directory contains a record of all permanent files, their cycles, and passwords. The permanent 
file catalog contains a record of the physical location and statistics associated with each permanent file. As 
long as these tables are intact, permanent files are available. 

Permanent files can be processed through control statements and macros. For information pertinent only to 
| COMPASS programmers, see section 7. 

CONCEPTS 

The following information describes concepts applicable to all permanent files. 

FILE IDENTIFICATION 

A permanent file is identified in system tables by the combined information supplied by a pfn, ID, and CY 
parameter when the file is made permanent with a CATALOG control statement. 

pfn Permanent file name of 1-40 letters or digits. 

ID=name Name of user responsible for file, 1-9 letters or digits. The ID specified must be unique 
if pfn is duplicated within the system. ID=SYSTEM is reserved for system use. 

CY=cy Cycle number 1-999. As many as five physical files can exist for each permanent file 

name and ID combination. Each is called a cycle. Each file shares the same ID and 
set of passwords. No restrictions are imposed on the content or size of any cycle, since 
each is a unique file. 

The pfn parameter is required for both the CATALOG request that makes a file permanent and the ATTACH 
request that associates an existing permanent file with a job. When the first seven characters of the permanent 
file name are the same as the logical file name, the permanent file name can serve as both the pfn and the 
lfn parameters. If the ID is not specified, ID=PUBLIC is assumed. If the file is cataloged with ID=PUBLIC, 
the ID parameter can be omitted for the attach. For any other name except PUBLIC, the ID parameter is 
required on the attach. An installation-defined password is needed to catalog a file with ID=PUBLIC. 

The CY parameter is optional. Cycle numbers need not be consecutive nor contiguous; they can be created in 
any order. At CATALOG time, the system assigns a cycle number ong greater than the largest existing cycle 
number if any of the following occur. 

CY parameter is omitted. 

CY parameter duplicates the number of an existing cycle. 

CY parameter is not within range of 1-999. 

System assignment of a cycle number is not possible when the cycle 999 exists, and the CATALOG request 

tor nn n&u.!iicn«u cyctC is unsucccsstui. 
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PERMISSIONS AND PASSWORDS 

All user files have a 4-bit permission code. Each bit represents an access permission as defined below. 






READ 

MODIFY 

EXTEND 

CONTROL 



Required to read a file, load a file, or copy a file. 

Required to rewrite existing data or evict part of a file. 

Required to evict part of a file or increase the amount of mass storage 
allocated to a particular file. 

Required to purge a file, or catalog a new cycle of an existing pfn/ID file. 



The RENAME and CATALOG functions require all four permissions. 

Files in use by a job, other than permanent files, have all access permissions except for the file INPUT, which 
has only READ and EXTEND permissions. Permanent files have only those permissions granted by ATTACH 
parameters. A purged permanent file, when still associated with the job that purged it, has only those per- 
missions it had as an attached permanent file. 

Permissions are established originally by parameters on the CATALOG control statement or macro, although 
they can be changed through RENAME. Passwords are a string of 1-9 letters or digits. They are defined on 
a CATALOG control statement by the following parameters. 



RD=rd 
EX=ex 
MD=md 

CN=cn 
XR=xr 

TK=tk 



Establishes password required for read permission. 

Establishes password required for extend permission. 

Establishes password required for modify permission. 

Establishes password required for control permission. 

Establishes password required for extend, modify, and control permission. Any EX, MD, 
or CN parameter overrides this password. 



Establishes turnkey password that is required in addition to a password for a particular 
permission. 

Any job using an existing permanent file must supply correct passwords in order to receive permission for 
functions protected by a password. On an ATTACH, RENAME, or PURGE, or on a CATALOG of a new 
cycle, passwords are submitted with the PW parameter, not the parameter used to create the password. 

PW=pwl,pw2,pw3,pw4,pw5 1-5 passwords for specific permissions. 

The universal password, universal permission, and public password for private device sets are defined on the 
ADDSET control statement when the master device is created. For public device sets, they are defined by 
the installation (see the NOS/BE Installation Handbook). 
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The universal password is a string of 1-9 letters or digits. When specified for a function that references a 
permanent file, such as ATTACH, it grants the universal permission defined for that set. Universal permission 
is any non-null combination of control, modify, extend, and/or read permissions. The universal password 
takes precedence over any password defined by CATALOG or RENAME, as explained in the following 
examples. 

PURGE(pfn,ID=id,SN=MYSET,UV=MYUNIVPW) 

If the universal password is MYUNIVPW and the universal permission is control permission on device set 
MYSET, then the universal password can be used to purge any permanent file on MYSET even though 
a CN= password has been defined to restrict access to that file. 

ATTACH(pfn,ID=id,SN=DSET,UV=U) 

If the universal password is U and the universal permission is read permission on device set DSET, then 
the universal password can be used to attach and read any permanent file on DSET even though an 
RD= password has been defined to restrict access to that file. 

The public password is a string of 1-9 letters or digits. On a CATALOG of a file with ID=PUBLIC, the 
public password for this device set must be specified using PW=. 

MULTIPLE ACCESS 

More than one job might have a given permanent file attached at the same time depending on the permissions 
involved and the use of the RW (single write/rewrite) and MR (multi-read) parameters. Many jobs can read a 
I file at the same time but only one at a time can have modify, extend, or control permission. Use of param- 
eters that allow multi-access is encouraged. 

When a file is cataloged initially, it remains associated with the job with all permissions, except when MR=1 
or RW=1 is specified on the CATALOG request. In the absence of RW=1 or MR=1 on the CATALOG request, 
no other job can attach the file until the creating job returns it to the control of the permanent file manager, 
since any job with control permission has exclusive file access. However, an RW=1 or MR=1 parameter makes 
the file immediately available, on a read-only basis, to any other attaching job, but cancels all permissions except 
read for MR=1 and cancels control permission for RW=1. 

I An alternate method of allowing multiple attaches with read only permission is to initially catalog the file 
with XR= specified. Subsequent attaches without PW= or MR= specified default to multi-read access. 

An RW=1 or MR=1 parameter on an ATTACH request restricts permissions that might otherwise be granted. 
An MR=1 cancels all permissions except read; an RW=1 parameter cancels control permission but retains 
modify, extend, and read permission. RW=1 overrides MR=1. 

RW=0 or RW unspecified on an ATTACH statement results in exclusive access if control, modify, or extend 
permission is granted. 

QUEUED AND ARCHIVED FILES 

Job requests to attach a permanent file usually are executed immediately. If a job cannot attach a file 
immediately, it attempts to enter that file in a queue. Four conditions can cause a job making a permanent 
file request to be placed into the permanent file queue. 
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TRANSPF utility is running. 

Attached permanent file table, which is necessary for CATALOG or ATTACH, is full. 

rue lu uc aii<t^iicu is nui avauauic iw O't"' "* »vwo«» iv<iw»tww. 

File to be attached is archived. 

The job remains in the permanent file queue until the ATTACH request can be honored or until the user 
or operator aborts the request. 

At some installations, permanent files physically reside on rotating mass storage devices at all times and are 
immediately available to a requesting job. At other installations, some permanent files might be dumped to 
a tape through the DUMPF utility. Such files are not available to a requesting job until they are reloaded 
through the LOADPF utility. 

A permanent file physically on tape, but known to the system through permanent file table information, is 
defined as an archived file. The archiving process does not affect the file's status as a permanent file. There- 
fore, the file does not need to be re-cataloged. An archived file must be returned to mass storage before the 
job can read or write the file. An archived file can be purged, however, when still on tape, since only 
system tables are affected by a purge function. 

A request for an attach of an archived file might or might not be honored depending on installation proce- 
dures. When the system receives a request for an attach of an archived permanent file, the system informs 
the operator of the request and indicates the VSN of the tape required. The operator mounts the specified 
tape, then authorizes the load by entering a command from the keyboard. The job continues when the file 
is available. 

A request for an archived file submitted interactively through a remote terminal produces the following message 
at the terminal. 

REQUEST FOR ARCHIVED FILE - WAITING FOR CENTRAL OPERATOR DROP OR GO 

In response to a GO command from the operator, the job is put into the permanent file queue, the message 
WAITING FOR ARCHIVED FILE is sent to the terminal user, and a job is set up at another control point 
to retrieve the file from tape. The INTERCOM user must wait for retrieval to be completed before the file 
is attached. In response to DROP, the file is not brought into the system and the attach request is terminated. 

Once the WAITING FOR ARCHIVED FILE message appears at the terminal, the terminal user has the option 
of waiting for the file to be made available or of continuing with other tasks. An abort command after the 
central site operator enters GO affects the attach request itself, but does not affect the reloading of the file 
to mass storage. Consequently, the following procedure can save time during interactive processing. 

1. Enter command to attach file. Wait until WAITING FOR ARCHIVED FILE message appears. 

2. Enter abort command. 

3. Continue with other operations. 

4. Reissue ATTACH command. 
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The second ATTACH command should execute immediately since the file should have been returned to mass 
storage while other terminal operations proceeded. 

INCOMPLETE CYCLES 

Incomplete cycles might exist as the result of abnormal termination of a permanent file manager function. 
They might also be created by a normal deadstart taking place during a permanent file function. The file is 
automatically purged when the file is returned or during end-of-job processing. To remove an incomplete 
cycle from the system, the file must be attached with the cycle number explicitly stated and with control 
permission. 

Execution of the AUDIT utility with an MO=I parameter reveals the existence of any such incomplete cycles. 



USAGE 

BATCH JOB USAGE 

Permanent files are manipulated by the following control statements at a single mainframe installation. At 
linked multi-mainframe sites, these statements are used when the permanent file resides at the site at which 
the job is submitted and executed. 

CATALOG Make a local rotating mass storage file permanent with a particular name and owner. 

Parameters on the CATALOG statement become part of a system table that controls 
all further file use. 

ATTACH Associate a permanent file with a job. Parameters on the ATTACH statement must 

agree with privacy controls of CATALOG to establish the right to access the file. 

PURGE Delete a permanent file by deleting system table information. The file remains attached 

to the job as a local file. 

EXTEND Increase the size of an attached permanent file. 

RENAME Change system information established when the file was cataloged. 

ALTER Change the size of an attached permanent file. 



When the permanent file resides at a linked multi-mainframe site other than that at which the job executes, 
the following statements must be used instead of the previous ones. 



SAVEPF 



GETPF 



Create a permanent file on a public device at the system identified by the ST 
parameter. Parameters on the SAVEPF statement become part of a system table 
that controls all further file use. 

Assign permanent file residing on the system specified by the ST parameter to the 
job. Parameters on the GETPF must agree with privacy controls of SAVEPF to 
establish the right to access the file. 
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For a single file, the CATALOG, SAVEPF, ATTACH, and GETPF control statements can be combined as 
required to access the permanent file from a given system. A file cataloged with CATALOG can be attached 
with GETPF. 

™, , . „ . . ; j. i.-„.ui„ +„ ..^.^nt fiio fn«,M-ir>n« Anv narameter not aoolicable to a given 

laoie -5-i summarizes paiaiiicicis appu^auic iu (luiuomu. *"- *.«»•«.«.»« — — ., r 

control statement is ignored. The control statements and their parameters are explained in section 4. 








lfn/pfn 


AC 


CN 


CY 


EC 


EX 


FO 


ID 


LC 


MD 
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PW 


RB 


RD 


RP 


RW 
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XR 


SN 


ST 


uv 


CATALOG 


both or one 
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SAVEPF 


both or one 
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ATTACH 


both or one 
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GETPF 


both or one 
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PURGE 


both or one 
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* 
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RENAME 


lfn pfntt 
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EXTEND 


lfn 








































ALTER 


lfn 




I 

._ 


1 




1_ 










l~ 1 
1 




I 




I 


I 


+ required * optional t special case 
tt applicable only when pfn is not attached 


o ignored with message 





The following utility routines exist explicitly for permanent file use. 

AUDIT Reports the status of permanent files. 

DUMPF Dumps files to tape for backup or temporary storage as archived files. 

GENLDPF Generates LOADPF jobs according to the permanent file catalog (PFC) entries on 

the tape produced by PFLOG. 

LOADPF Loads permanent files that have been dumped by DUMPF. 

PFLOG Dumps the PFC to tape. 

TRANSPF Moves permanent files and permanent file tables between members of a device set 

and moves files from one device set to another. 

These utilities can be called such that all permanent files are affected or that only files pertaining to a given 
ID, device, or use are affected. 

Files to be made permanent must reside on a device that the ADDSET control statement establishes as a 
permanent file device. The user job can create a file on a permanent file device in two ways. 
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If the file is to be cataloged on a public permanent file device or on a private device whose VSN is not 
known, the *PF parameter should be specified on the REQUEST statement that establishes the file. 

If the file is to be cataloged on a public or private device with a volume serial number known to be the 
number of a permanent file device, the VSN parameter should be specified on the REQUEST. 

Cataloging a file results in entries in system permanent file tables. The file remains attached to the job and 
can be used as any attached permanent file. At the termination of the job that cataloged the file, the system 
detaches the file. The job can, but need not, execute a RETURN or UNLOAD function to detach the file. 



INTERCOM USAGE 

From the terminal, the INTERCOM user can create, attach, and purge permanent files in any of three ways: 
By using standard macros within the user's own interactively run COMPASS program. 

By entering the commands ATTACH, CATALOG, etc., as if they were control statements in a batch 
INPUT file. 

By using the special INTERCOM commands FETCH, STORE and DISCARD. These commands allow 
the user to create and use permanent files with certain restrictions. 

Files created by the STORE command cannot have any passwords. The only parameters for STORE are 
filename and user id. The permanent file name and the local file name are the same. User id is required 
according to installation options. If a required parameter is missing, it is requested from the user. 

When a permanent file has been created through the STORE command, the user can access it through the 
ATTACH or FETCH commands. FETCH parameter requirements are the same as for STORE. 

Similarly, the DISCARD command as well as the PURGE command can be used to purge a permanent file 
created by the STORE command. DISCARD has the same parameter requirements as STORE, with the ex- 
ception that the user id parameter can be omitted if the file is already attached. Since execution of the 
DISCARD control statement involves both a PURGE and a RETURN, the purged file does not remain as a 
local file after the DISCARD is executed. 

From an INTERCOM terminal, private device sets can be used but not created. The commands MOUNT, 
DSMOUNT, etc., can be entered as if they were control statements in a batch input file. LABELMS, 
RECOVER, DELSET and ADDSET commands cannot be entered from INTERCOM. A MOUNT of the 
master device must be the first reference to a device set. After the master has been mounted, the REQUEST 
command and the permanent file commands ATTACH, CATALOG, etc., with SN parameters can be used to 
access device sets. A file written on a private device set can be made permanent with the STORE command. 
FETCH can be used to attach a device set resident permanent file only after a SETNAME command has been 
issued. If a private device set resident permanent file has been attached, it can be purged with DISCARD; if 
it has not been attached, it cannot be purged with DISCARD. 

If an INTERCOM job enters into the permanent file queue because a permanent file request cannot be 
honored immediately, the user is informed by one of the following messages. 
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WAITING FOR PF UTILITY 
WAITING FOR APF SPACE 
WAITING FOR ACCESS TO FILE 
WAITING FOR ARCHIVED FILE 
WAITING FOR VSN=vsn,SN=setname 

INTERCOM PERMANENT FILE USE EXAMPLES 

In these examples the information output by the INTERCOM system on the terminal display is underlined to 
distinguish it from that entered by the user. This does not actually occur on the output. The symbol @ 
denotes carriage return. 

1. COMMAND- STOREJrfYFILE © 
ID=RKC @ 

The installation requires a user id parameter. The user file called MYFILE is made permanent. 

2. COMMAND -FETCH.MYFILE.RKC @ 

COMMAND- DISCARDJUYFILE @ 

During a later session, the user attaches the file and then purges it. 

ACCOUNTING 

If the installation chooses, messages are sent to both the system and user dayfiles whenever the status of a 
referenced permanent file changes. The messages are as follows: 

CATALOG CT ID=name PFN=pfn 

CT CY= cy nnnnnnnn WORDS. 
CT SN=setname 

EXTEND/ALTER EX ID=name PFN=pfn 

EX CY= cy nnnnnnnn WORDS. 

PURGE PR ID=name PFN=pfn 

PR CY= cy nnnnnnnn WORDS. 

RENAME (old. permanent file) NM ID=name PFN=pfn 

NM CY= cy nnnnnnnn WORDS. 

RENAME (new permanent file) RN ID=name PFN=pfn 

RN CY= cy nnnnnnnn WORDS. 



60493800 E 3-21 • 



The first two characters of each line identify the permanent file function that caused a status change. Other 
parameters are: 

ID=name Name which identifies the file owner or creator. 

PFN=pfn Permanent file name which identifies the file. 

CY= cy Cycle number, 1-999, assigned by creator. 

nnnnnnnn WORDS Amount of mass storage space occupied by the file, given in decimal number of 
central memory words. 

SN=setname Setname of file if it resides on a public set which is not the PF default. 

EXAMPLES 

The examples below form a continuous set. Many ATTACH, RENAME, and PURGE examples presume files 
established by CATALOG examples. 

CATALOG EXAMPLES 

The first set of examples demonstrate initial catalogs; the permanent file name is unique to the ID specified. 

1. CATALOG(LFN,LFN,ID=RENOIR) 

CATALOG(LFN,ID=RENOIR) 

These statements achieve the same effect. Any time the permanent file name is omitted, it is assumed 
to be the same as the logical file name. The cycle number is one. 

2. CATALOG(LFNl ,PERMANENTFILE,ID=RENOIR,CY=10) 

The first cycle cataloged can have a cycle number greater than one. 

3. CATALOG(LFN2,PFILE ) ID=RENOIR,CY=0) 

The cycle number of the permanent file, PFILE, is one since an illegal cycle number is specified. The 
cycle number must be 1 through 999. Otherwise, the parameter is ignored. 

4. CATALOG(WATER,UUES,ID=CMONET,XR=X) 

CATAL0G(WATER,UUES,n>CM0NETJrfD=X,CN=X3X=X) 

These control statements demonstrate the XR parameter and have the same effect. X is the password 
for control, modify, and extend access. 

5. CATALOG(AA,B,ID=SEURAT,XR=Y,CN=Z) 

CATAL0G(AA,B,ID=SEURATJS1D=Y,EX=Y,CN=Z) 

These control statements have the same effect, further demonstrating use of the XR parameter. 
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6 . CATAIXD(^C,F,IE>=SIGNAC,FC=IS,MD=X,EX=Y) 

If a data validity check reveals the file is an indexed sequential, direct access, or actual key file, extend 
permission becomes insert permission, and modify permission becomes replace permission. If the file 
is not an IS, DA, or AK file, the FO parameter is ignored. 

7. CATALOG(LFF,PF,ID=MATISSE,RP=5,CY=4,RD=X,CN=Y^D=A,TK=C^C=777^R=l) 

Since the MR parameter is non-zero, LFF has only read permission upon catalog completion. The 
following items are defined at catalog time. 



Read password 


X 


Control password 


Y 


Modify password 


A 


Turnkey password 


C 


Account parameter 


777 


Cycle number 


4 


Retention period 


5 days 



Assuming the previous examples to be successful initial catalogs, the following examples demonstrate new-cycle 
catalogs. A file already has been cataloged with the permanent file name and ID specified. 

8. CATALOG(Z,LFN,ID=RENOIR) 

CATALOG(Z,LFN,ID=RENOIR,CY=2) 

These control statements catalog a cycle with a cycle number one higher than the largest (in this case 1). 
This new-cycle catalog does not require passwords because a control password was not defined. 

9. CATALOG{LFN22JPERMANENTFILE,ID=RENOIR,CY=10) 

Assuming a cycle 10 already exists, this control statement causes cycle 11 to be cataloged. An invalid 
cycle number is treated as no cycle number. This new-cycle catalog does not require passwords, because 
a control password was not defined at initial catalog time. 



1 0. CATALOG(LFF JPF,ID=MATISSE,CY=5 ,PW=Y) 

If a control password is defined at initial catalog, it is necessary to submit the control password using the 
PW parameter. Control permission is required to add a new cycle. 

1 1 . CATALOG(LFF,PFl ,ID=PUBLICJPW=XYZ) 

A file can be cataloged with an ID of PUBLIC if the public password is submitted, defined by the 
installation as XYZ in this example. This enables an installation to define permanent files that can be 
attached by all users without specifying an ID. 

12. CATALOG(PERMANENTFILENAME,ID=MOREAU) 

A catalog function is attempted using the first seven characters of the permanent file name as the logical 
file name. If the logical file name is omitted, the first character of the permanent file name must be 
alphabetic, or the job is terminated. 
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ATTACH EXAMPLES 

1- ATTACH(LFN,ID=RENOIR) 

ATTACH(LFN,LFN,ID=RENOIR) 

Assuming catalog example 8 was successful, these two control statements perform the same function If 
the permanent file name is omitted, it is assumed to be the same as the logical file name. Cycle 2 is 
attached since that is the highest cycle number. 

2. ATTACH(LFA,PF,ID=MATISSE,PW=X,C,EC=K) 

Assuming catalog example 7 was successful, cycle 4 of the permanent file, PF is attached with read and 
extend permission. During execution the permanent file is referred to by the logical file name LFA 
A standard size ECS buffer is established for the file. 

3. ATTACH(PERMANENTFILENAME,ID=RENOIR) 

An attempt is made to attach the permanent file, PERMANENTFILENAME, under the logical file name 
PERMANE. The first seven characters must be letters or numbers and begin with a letter if the logical' 
file name is omitted in the attach call. 

4. MOUNT(SN=SCIFLVSN=999) 
SETNAME(SCIFI) 
ATTACH(DUNE,ID=HERBERT) 

SETNAME. 
or 

MOUNT(VSN=999,SN=SCIFI) 
ATTACH(DUNE,ID=HERBERT,SN=SCIFI) 

Both examples have the same effect, the permanent file DUNE is attached to the job. The master device 
of the device set SCIFI must be mounted before this function is issued. 

5. ATTACH(WATER,ULLIES,ID=CMONET,MR=l) 
ATTACH(WATER,LILLIES,ID=CMONET) 

Assuming catalog example 4 was successful, these two control statements perform the same function of 
attachmg logical file WATER with multi-read permission. 



RENAME EXAMPLES 



1. 



I 3-24 



Assume PFILE was cataloged by owner ABC with read password X, extend password Y, and modify 
password Z. Control is granted automatically. 

ATTACH(LFILEJ>FILE,ID=ABCJ*W=Y^^) 

RENAMF/LFILE,PFILE2,RD=,CN=W) 

The permanent file name PFILE is replaced by PFILE2 (if no other permanent file named PFILE2 ID= 
ABC exists). The read, password is removed (succeeding users are given read permission automatically) 
and a password for control permission is cataloged. The existing passwords for extend and modify 
remain unchanged. Since the changes involve the permanent file name and passwords, the changes apply 
to all cataloged cycles of the file. This would also have been true if the owner ID had been changed 
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2. ATTACH(LFN,ID=UTRILLO) 
RENAME(LFN„ID=UTRILL0,RD=A,RP=9) 

RENAME(LFN,LFN,ID=UTRILL0,RD=A,RP=9) 

RENAME defines a RE AD password for the permanent file LFN, and redefines the retention period. 
Omission of the permanent file name in the first RENAME indicates no name change is to occur. The 
two RENAME control statements are identical in function. This example also demonstrates that more 
than one RENAME function can be issued consecutively. 

3. ATTACH(LFN„ID=SISLEY,PW=A) 

RENAME(LFN„ID=SISLEY,RD=) 

The definition of A as the READ password is removed from the permanent file, LFN. 

PURGE EXAMPLES 

1. ATTACH(LFN,ID=RODIN) 
PURGE(LFN) 

or ■ 

ATTACH(LFN,ID=RODIN) j 

PURGE(LFN,ID=RODIN) | 

Both sequences perform the same function. 

When a purge is performed, permanent file table information for the file is removed, but the file remains 
available to the job with permissions existing when it was purged. At least control permission is implied. 

2. PURGE(PERMANENTFILENAME,ID=PISSARO) 

If the purge is successful, the permanent file, PERMANENTFILENAME, no longer exists. Permanent file 
table information for the file is removed. The purge is not successful if the logical file name is omitted 
in the call and the first character of the permanent file name is not alphabetic. 

3. PURGE(PERMANENTFtLE,ID=RENOIR,LC=l) 

Assuming catalog examples 2 and 9 were successful, cycle 10 is purged. 

4. ATTACH(FAUVE,PF,ID=MATISSE,PW=Y,C) 
PURGE(FAUVE) 

Assuming catalog examples 7 and 10 were successful, cycle 5 is purged and remains attached to the job 
as a non-permanent file FAUVE with only control permission. 

5 . PURGE(DUNEMESSIAH,ID=HERBERT,SN=SCIFI) 

Assuming the master device of the set SCIFI was mounted by this job, the permanent file DUNEMESSIAH 
is purged and remains as a local file with lfn DUNEMES. 
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6. ATTACH(RED,LASER,ID=LIGHT,PW=CONTROL) 
PURGE(BLUE,LASER,ID=LIGHT) 

Because the permanent file cycle specified on the PURGE control statement was already attached (with 
a different logical file name), the purge is successful with RED as the resultant local file. 

ALTER/EXTEND EXAMPLE 

To replace an existing cataloged permanent file by using the ALTER/EXTEND sequence: 

ATTACH(LFN,PFN,ID=WHO,PW=MD ) EX) passwords for modify and extend are required 

REWIND(LFN) 

ALTER(LFN) release old permanent file data 

COPYBF(NEW,LFN) write new data 

EXTEND(LFN) make new data permanent 

EXTENDED CORE STORAGE FILES 

Extended core storage (ECS) can be used to buffer files and/or store files (as ECS resident files). Each file so 
designated is assigned a single buffer in the ECS paged partition. This paged buffer is assigned pages up to the 
limit snecifief! hv REOTTEST nr ATTACH TTcpr mr,!!*/rarf re! * Am„ n l, cro j,,,w a „ „» *., „- ei-iq -.:j..' «'- =c 

performed in the same manner as any other mass storage input/output. ECS buffered files are more flexible than 
ECS resident files since ECS resident files are not allowed to overflow to other mass storage devices. 

ECS BUFFERED FILES 

Sequentially accessed mass storage files on public device sets can be buffered through ECS to avoid the costly 
access time of rotating mass storage devices each time a small amount of information is transferred. In order to 
optimize the access to such devices, a larger amount of information is transferred between the device and ECS at 
the time of each access. For each CIO call, regular smaller transfers between ECS and the user central memory 
buffer take place at a high transfer rate without mass storage device access. 

The information read ahead (input file) or waiting to be written (output file) is stored temporarily in an ECS 
buffer. The underflow and overflow functions for these ECS buffers are performed automatically by the system. 
On a write function, system programs transfer data from the file's circular buffer in central memory to the ECS 
buffer. When the ECS buffer is filled to the maximum size defined by REQUEST or ATTACH, it is written to 
mass storage. On a read, the ECS buffer is filled in advance from disk, and data is transferred to the circular 
buffer in central memory as the circular buffer is emptied. 

The ECS buffers are requested on a file-by-flle basis through the REQUEST control statement or macro, or 
through an ATTACH statement or macro. A different buffer size can be specified for each file if the standard 
buffer size is not desired. 

The data contained in an ECS buffer is written to a mass storage device only if the file is closed or exceeds the 
limit of the ECS buffer. 

For optimum performance, the ECS buffer should be many times the size of the user's CM circular buffer. 
This ensures that the system overhead associated with ECS buffer management is small compared to the time 
saved as a result of performing fewer device accesses. Suggested relative buffer sizes are: 
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CM Circular Buffer ECS Buffer 

1000 octal words or less 10000 octal words or less 

1001 ■ 2000 octal words 10000 - 20000 octal words 
2001 octal words or more 20000 octal words or more 

For I/O bound programs using large central memory circular buffers there is little advantage in using I/O 
buffering. In general, an I/O buffer can be used to reduce the central memory buffer size while maintaining 
the high transfer rates associated with having large central memory circular buffers. Throughput on I/O 
buffered files is primarily a function of the ECS buffer size, rather than the central memory circular buffer 
size. 

If an unrecovered ECS parity error is encountered with the EP bit set, control is returned to the user program 
with the error noted in the code and status field of the FET. If the error occurs with the EP bit off, a GO 
or DROP decision is required of the operator. 

ECS RESIDENT FILES 

This facility is provided as an installation option selected when the system tape is built. Except for some 
specific applications where a faster, limited rotating mass storage device is needed, it is generally preferable 
to use the I/O buffering scheme instead of ECS resident files. I/O buffering allows an overall optimization 
of the system. 

Nevertheless, under this option any non-permanent sequential or random file can be ECS resident. ECS 
resident files are requested on a file-by-file basis. REQUEST has the same format as the one used for buffer 
allocation with the addition of the device type mnemonic of AX. If no EC parameter is present on the 
REQUEST, the file is limited to the default I/O buffer size specified at deadstart time. Otherwise, the EC 
parameter specifies the file size limit. 

When an overflow occurs, i.e., all ECS pages are allocated or the maximum file size is exceeded, an error code 
10 (device capacity exceeded) is stored in bits 9-13 of the code/status field and control is transferred to the 
user if the EP bit is set; otherwise, the job is aborted. 

NOTE 

If ECS is turned off, all requests for ECS buffers are ignored and the 
files requested on ECS are allocated on other mass storage devices. 

MAGNETIC TAPE FILES 

A single reel of magnetic tape is known as a volume. A volume set can consist of: 
A single file on one volume 
A multifile set on a single volume 

A multivolume file extending over more than one volume 
A multivolume, multifile set extending over more than one volume 
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All information on a magnetic tape begins after a physical reflective spot known as the load point. When this 
is sensed by a photoelectric cell, the tape is at its load point. Another physical reflective spot appears near 
the end of all tapes, which warns the software to initiate end-of-tape procedures. 

The structure of a tape file, such as the number of characters in a block and the definition of end-of-information, 
is affected by these characteristics: 

Physical recording is 7-track or 9-track 

Format is SI format (standard system format), S format, or L format 
Standard labels exist or do not exist 
See appendix C for a summary of tape characteristics. 

The default tape characteristics assumed by the system are an unlabeled 7-track tape recorded at an installation- 
defined default density in SI format. Any other tape density, format, or label must be explicitly declared by 
a REQUEST or LABEL statement. 

TAPE MARKS 

A tape mark is a short record used on SI tapes to separate label groups and. files from label information. On 
S and L tapes, it can also separate files in addition to separating label groups. Interpretation of multiple tape 
mark? depends on the tape format. The format of a ta n ? mark is defined b v the ANSI standard described 
later in this section. These tape mark records are written by operating system routines. On S and L tapes, 
tape marks can be written by the COMPASS macro WRITEF. 



DATA FORMAT 

Three data formats exist: 

SI System default format 

S Stranger tape format 

L Long stranger tape format (supported on 667, 669, 677, and 679 tape drives only) 

SI format is assumed unless an F=S or F=L parameter appears in a LABEL control statement or S or L is 
explicitly declared on a REQUEST control statement. Both binary and coded data can be recorded in any of 
these formats. 
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SI TAPES 

SI format tape is the system standard. The structure of information on these tapes corresponds to the struc- 
ture of files on rotating mass storage. Each block on the tape is a physical record unit, with the end of a 
system-iogicai-record defined by the presence of a short or zero-length FRU. 

The size of a PRU on tape depends on whether the data is written in coded or binary mode: 

For coded tapes, a PRU is the contents of 128 central memory words. 

For binary tapes, a PRU is the contents of 512 central memory words. 

The short or zero-length PRU that terminates a record is less than full PRU size. 

Each system-logical-record is terminated with a 48-bit marker that contains a level number. The marker is 
appended to the data in the peripheral processor when the tape is written and stripped from the data when 
the tape is read. Only data passes from the tape to a user program in central memory. 

A level number of 17g indicates an end-of-partition. Level 17g is always written as a zero-length PRU. 

When an output file on an SI tape is closed, the operating system appends up to four items: a level 17g 
zero-length PRU.t a single tape mark, trailer label information for both labeled and unlabeled tapes, and a 
double tape mark. The file is then positioned to the beginning of the single tape mark. If more information 
is written to the tape, only the level 17g marker indicating an end-of-partition remains. If the tape is rewound 
or unloaded, the four items exist to define end-of-information. 

The SI tape structure that results from a request for an unlabeled tape is as follows: 



File 



End-of-Tape Reflector 




Partition 



17 



17 



EOFl 
l railer 
Label 



Load Point 



Level 17g Marker 
Tape Mark 



Double 
Tape Mark 



fThe presence of a level 17g PRU depends upon the procedures the programmer uses to close the file 
(for example, a COBOL CLOSE or a FORTRAN ENDFILE statement writes the level 17 g PRU). 
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The SI tape structure that results from an unlabeled tape in which the file specified on the REQUEST control 
statement is opened and closed four times is as follows: 

File 



— ^ End-of-Tape Reflector, 



Partition 



17 



Partition 



17 



Partition 



17 



Partition 



17 



EOF1 

Trailer 

Label 



Load Point 



Tape Mark 



./ 



Double Tape Mark 



The same structure is obtained when the program opens the file, writes data and issues an instruction to write 
an end-of-partition, repeats the data and partition instructions three more times, then closes the file. 

Coded information is written on 7-track SI tape in external BCD format shown in appendix A. On a 9-track 
SI tape, data is written in packed (binary) mode for both coded and binary data. Records are always an even 
multiple of 10 characters. 



S AND L TAPES 

Data on S and L tapes is written in physical blocks separated by interblock gaps. S tape blocks are longer 
man noise size and shorter than or equal to 512 central memory words. L tape blocks are longer than" noise 
size and shorter than the user buffer for the tape. 

Neither S nor L tapes contain system-logical-records of various levels as do SI format tapes. The only records 
are the physical blocks; and the file is physically delimited by tape marks. The last file on an unlabeled S or 
L tape is terminated by four tape marks, but these are not recognized as end-of-information in the same sense 
as a label. The user must use the four tape marks, or marks within the data, to recognize end-of-information 
and initiate end-of-information processing. 

The S or L tape structure that results from a request for an unlabeled tape when the file is opened and 
closed three times, or is opened once and has three partitions written before the file is closed, is as follows: 




Tape Mark 4 Tape Marks 

Terminating 
Information 

On a labeled S or L tape, an EOFI label replaces the second terminating tape mark. The system recognizes 
the EOFI label as end-of-information for the tape and initiates end-of-information processing as indicated by 
the user. 

Noise size, nominally 6 characters for both S and L tapes, can be changed by the installation. Blocks shorter 
than or equal to noise size are not delivered to the user on read operations. An attempt to write a block 
shorter than or equal to noise size causes an error. 



JOU 
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In COMPASS, the maximum logical record size (MLRS) and unused bit count (UBC) fields in word 7 (lfn+6) 
of the FET should be declared when S or L tapes are processed. MLRS declares the maximum number of 
60-bit central memory words in the block. The last word might not be full of data since S and L tape 
blocks are measured in characters instead of words. UBC must declare the number of bits not used in the 
last transmitted word. On a write operation, the operating system rounds down the UBC so that an integral 
number of characters are written. The discussion of the FET fields that appears in section 6 explains these 
concepts in more detail. 

If the MLRS and UBC are not declared, the system assigns default values. The default for UBC is zero. The 
default for MLRS is 512 words for S tapes and two words less than the user buffer size for L tapes. 



7-TRACK VS. 9-TRACK TAPES 

Both 7-track and 9-track 0.50-inch magnetic tape can be processed by the operating system. Parameters on 
REQUEST and LABEL statements differ for recording densities, data format, and character conversion. Other- 
wise, label characteristics and tape usage are the same for both, except that 9-track L tapes are supported only 
on 669 and 679 tape drives. 



7-TRACK TAPE 

Seven-track tapes are processed by 667 and 677 tape drives. Data can be recorded in three densities: 

LOt 200 bpi (low) 
HI 556 bpi (high) 

HY 800 bpi (hyper) 

Installation-defined default densities are used for reading unlabeled tapes and writing both labeled and unlabeled 

labeled input tapes. However, it is always advisable to specify density because of the reading peculiarities of 
the tape drives. A tape label can be read at an incorrect density without causing a parity error. Longer data 
blocks read at an incorrect density cause parity errors. 

On a REQUEST statement, MT explicitly defines this tape as 7-track; LO, HI, or HY provides an implicit 
definition. On a LABEL statement, 7-track is assumed unless 9-track is specifically declared. 

9-TRACK TAPE 

Nine-track tape is processed on CDC 669 and 679 tape units. On a REQUEST control statement, an NT 
parameter explicitly specifies a 9-track tape. On both REQUEST and LABEL control statements, a density 
specification of HD, PE, or GE implicitly specifies a 9-track tape. 



fData cannot be written at 200 bpi on 667 or 677 tape drives although both drives can read 200 bpi tapes. I 
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Under hardware control, 9-track tapes are always read at the density at which they were written. Writing 
density is determined by an installation default or by the density parameter on the REQUEST or LABEL 
control statement. Density parameters are: 

HD 800 cpi (high density) applies to 669 and 679 tape drives 

PE 1600 cpi (phase encoded) applies to 669 and 679 tape drives 

GE 6250 cpi (group encoded) applies to 679 tape drives 

Data on SI format 9-track tape appears in memory as it exists on tape. Data is not converted while being 
transferred between devices. 

When S or L format 9-track tapes are written or read, processing depends on whether the* tape is binary or 
coded. Binary tape processing is the same as SI format tape processing, with no conversion. Data on coded S 
and L tapes is converted between the tape and memory. Data in the user buffer in central memory is assumed 
to consist of a string of 6-bit display code characters. The display code characters are mapped into 8-bit 
characters when written to the tape. The 8-bit characters can be a subset of either ASCII or EBCDIC, as 
specified by the REQUEST or LABEL control statement. Conversion from 8-bit characters to 6-bit characters 
takes place when the tape is read in conversion mode. The parameters on the REQUEST or LABEL control 
statement that select conversion mode are as follows: 

US ASCII conversion 
EB EBCDIC conversion 

TAPE LABELS 

Labels on a tape consist of 80-character records that identify the volume of tape and files it contains. They 
are the first records after the load point marker. Labels can appear on all tapes. A label record has a 
particular format. The first four characters of the label are VOL1. Any tape that begins with characters 
other than VOL1 is considered to be unlabeled. 

Two types of labels are recognized: 

Standard system labels conform to labels defined by the American National Standard, Magnetic Tape 
Labels for Information Interchange, X3.27-1969. Density of the label is the same as the density at 
which the data on the tape is recorded. Standard system labels are requested with a U parameter on 
a REQUEST control statement or macro. On a LABEL control statement or macro, the absence of a 
Z parameter requests a standard label. 

Z labels conform to an earlier ANSI standard in which the density of the label and the density of the 
data were not necessarily the same. Z labels are similar to standard labels, except that character 12 of 
the VOL1 specifies the density of the data. When a Z-label tape is being read, the system changes the 
read density, if necessary, during label processing. When a Z label is written, the system treats a Z 
label as a standard label. Z labels are requested with a Z parameter on a REQUEST or LABEL control 
statement or macro. 

Labeled tapes provide the following advantages for the user. 

When a write ring is left inadvertently in an input tape reel, software checking ensures that no part of 
the tape is over-written without the express permission of the operator. 
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The number of blocks written on a file is recorded in the file trailer label, as well as in the job dayfile. 
On subsequent file reading, the count serves as additional verification that data was read properly. 

The volume number field of the label ensures processing of all volumes in the proper sequence. 

Multi-file volumes with ANSI labels can be positioned by label name, rather than by file count only. 

T"nA vrilnmp cpriq! rmmnpr nf tirm ANSI 13!".£> rpan r.r \ariitp-n .5 rprr^rrleri ITi £hfi navnip 

Overall job processing time is reduced when the system can use the VSN field to locate and assign a tape 
to the requesting job without operator action at the keyboard. 

The maximum benefit from the operating system tape scheduling and automatic tape assignment features can be 
derived only if all magnetic tapes used at an installation are labeled. 

ANSI defines the following types of labels. The first three characters identify the label type; the fourth 
character indicates a number within the label type. 



Type 


No. 


Label Name 


Used At 


Operating System Processin 


VOL 


1 


Volume header label 


Beginning of volume 


Required 


UVL 


1-9 


User volume label 


Beginning of volume 


Optional 


HDR 


1 


File header label 


Beginning of file 


Required 


HDR 


2-9 


File header label 


Beginning of file 


Optional 


UHL 


f 


User header label 


Beginning of file 


Optional 


EOF 


1 


End-of-file label 


End of file 


Required 


EOF 


2-9 


End-of-file label 


End of file 


Optional 


EOV 


1 


End-of-volume label 


End of volume 


Required when appropriate 


EOV 


2-9 


End-of-volume label 


End of volume 


Optional 


UTL 


f 


User trailer label 


End of file 


Optional 



Table 3-2 shows the contents and defaults of label fields. All required labels are checked by the operating 
system on input and generated by the operating system on output if the user does not supply them. The user 
must supply all optional labels to the operating system. Optional ANSI label types are accepted for reading or 
writing when extended label processing capabilities are requested through the XL bit of the file environment 
table, as explained in section 6. However, all manipulating of such labels must be done by user code. The 
NS parameter of REQUEST or LABEL inhibits operating system processing of labels on S or L tape. 



I 



^Any member of CDC 6-bit subset of ASCII character set. 
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TABLE 3-2. ANSI STANDARD TAPE LABEL FORMATS 





Character 
Position 


Field 


ANSI Name 

(NOS/BE 1 Name) 


Length 


Contents 


Default 
Written 


Checked 
On Input 


Volume 

Header 

Label 


1-3 


1 


Label Identifier 


3 


VOL 


VOL 


Yes 


4 


2 


Label Number 


1 


1 


1 


Yes 


5-10 


3 


Volume Serial 
Number 


6 


Any a 
characters 


As typed from 
console 


Yes if file 
assigned 
byVSN 


11 


4 


Accessibility 


1 


Space 


Space 


No 


12-31 


5 


Reserved 


20 


Spaces 


Spaces 


No 


32-37 


6 


Reserved 


6 


Spaces 


Spaces 


No 


38-51 


7 


Owner ID 


14 


Any a characters - 


Spaces 


No 


52-79 


8 


Reserved 


28 


Spaces 


Spaces 


No 


80 


9 


Label Standard 
Level 


1 


1 


1 


No 


First 

File 

Header 

Label 

1 


1-3 


1 


Label Identifier 


3 


HDR 


HDR 


Yes 


4 


2 


Label Number 


1 


1 


1 


Yes 


5-21 


3 


File Identifier 

(File Label 

Name) 


17 


Any a 
characters 


Spaces 


Y~ 


22-27 


A 


Set Identification 

(Multi-File Set 

Name) 


6 


Any a 
characters 


Volume Serial 

Number of 

first volume of set 


No 


28-31 


5 


File Section 

Number 

(Volume Number) 


4 


4 n characters 

indicating number 

of volume in 

file 


0001 


Yes 


32-35 


6 


File Sequence 
Number 
(Position 
Number) 


4 


4 n characters 
indicating num- 
ber of file in 
multi-file set 


0001 


Yes 


36-39 


7 


Generation 
Number 


4 


Not used 


Spaces 


No 


40-41 


8 


Generation 
Version Number 
(Edition Number) 


2 


2 n characters 
indicating the 
edition of file 


00 


Yes 


42-47 


9 


Creation Date 


6 


Space followed 
by 2 n charac- 
ters for year, 3 
n characters for 
day 


Current date 
is used 


Yes 


48-53 


10 


Expiration Date 


6 


Same as field 9 


Same as field 9 


Yes 


54 


11 


Accessibility 


1 


Any a characters 


Space 


No 


55-60 


12 


Block Count 


6 


Zeros 


Zeros 


Yes 


61-73 


13 




System Code 


13 


Any a characters 


Spaces 


No 


74-80 


14 I 


Reserved 


7 


Spaces 


Spaces 


No 
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TABLE 3-2. ANSI STANDARD TAPE LABEL FORMATS (Contd) 





Character 
Position 


Field 


ANSI Name 

(NOS/BE 1 Name) 


Length 


Contents 


Default 
Written 


Checked 
On Input 


Additional 
Labels 


1-3 


1 


Label Identifier 


3 


HDR 


HDR 


Yes 


4 


2 


Label Number 


1 


2-9 


2-9 


Yes 


All other fields are not checked on input; they are written as received from user. 


First 
End-of- 
File Label 


1-3 


1 


Label Identifier 


3 


EOF 


EOF 


Yes 


4 


2 


Label Number 


1 


1 


1 


Yes 


5-54 


3-11 


Same as corres- 
ponding HDR1 
label fields 










55-60 


12 


Block Count 


6 


6 n characters; 

number of data 

blocks since 

last HDR label 

group 




Yes 


61-80 


13-14 


Same as corres- 
ponding HDR1 
label fields 










Additional 

End-of-File 

Labels 


1-3 


1 


Label Identifier 


3 


EOF 


EOF 


Yes 


4 


2 


Label Number 


1 


2-9 


2-9 


Yes I 


All other fields are not checked on input; they are written as received from user. 


First 

End -of- Volume 

Label 


1-3 


1 | Label Identifier 


3 


EOV J EOV 


Yes 


4 


2 | Label Number 


1 


1 I 1 


Yes 


All other fields are identical to EOF1 label. 


Additional 
End-of- 
Volume 
Labels 


1-3 


1 | Label Identifier 


3 


EOV 


EOV 


Yes 


4 


2 | Label Number | 1 


2-9 


2-9 


Yes 


All other fields are not checked on input; they are written as received from user. 


USER 
Labels 


1-3 


1 


Label Identifier 


3 


3 letter code: UVL, UHL, or UTL 


Yes 


4-80 


Any a characters. Content of these fields is not checked on input; 
content is written as received from the user. 


a any character 
n any digit 
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STANDARD LABELED TAPE STRUCTURE 



The four ANSI labels required are used as follows (tape marks separating items are completely system 
controlled): 



VOL1 



HDR1 



EOF1 



Must be the first label on a labeled tape volume. This label contains the volume serial 
number which uniquely identifies the volume. 

Required label before each file or continuation of a file on another volume. It is 
preceded by a VOL1 label or tape mark. Each file must have a HDR1 label which 
specifies an actual position number for multi-file sets. 

Terminating label for file defined by HDR1 label. The EOF1 label marks the end-of- 
information for the file. A single tape mark precedes EOF1. A double tape mark 
written after the EOF1 label marks the end of a multi-file set. 



EOV1 Required only if physical end-of-tape reflector is encountered before an EOF1 is 

written or if a multi-file set is continued on another volume. It is preceded by a 
single tape mark and followed by a double tape mark. 

The structure of SI tapes that results from these required labels is shown below. The label identifier and num- 
ber is used to denote the entire 80-character label in these figures. 

Single volume file: 



Load Point 




Multi-reel file: 



•Tape Mark 



FILEA 

— r v- 



End-of-Tape Reflector 



EOF1 



"T^" 



Double Tape Mark 



VOL1 



HDR1 



-AF- 
FILE A 



EOV1 



VOL1 



HDR1 



Ar 



FILE A (Continued) 
% 



EOF1 



^m 
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Multi-file volume structure that results from a request for a multi-file set is: 

/ \j— i — i 1 — i 1 — I V 



U777\ 

Y//A 



VOL1 



HDR1 



FILE A 

-Ar- 



EOF1 



HDR1 



FILEB 



EOF1 



^w 



Multi-file multi- volume sets are also possible. Tape label configuration that occurs when EOF1 coincides with 



LABELED MULTI-FILE SETS 

A multi-file set consists of one or more files on one or more volumes of tape, 
by name, even though their order is not known. 



Individual files can be accessed 



Labeled multi-file sets require the use of both REQUEST and LABEL statements. (LABEL statements are not 
required if the program can generate these fields internally,) REQUEST specifies the tape characteristics; 
LABEL produces the file header for individual files. LABEL must specify the set name as the M parameter. 
This set name is limited to six characters and must be different from any local file name. The utility routine, 
LISTMF, is available to list the labels of all files in an existing set. LABEL can be used to position within a 
set when a position number is used in the parameter list. 

To create a labeled multi-file set, the following parameters should be used (parameters after the first can appear 
in any order). The label type must be U. 



REQUEST(mfn,MF,U,RING,...) 

LABELQfcn ,M=mfn,W,...) 
LABEL(lfn 2 ^l=mfn,W,...) 



Program call to create lfnj 
Program call to create lft^ 



The mfn parameter is the name of the multi-file set, 1-6 letters and digits beginning with a letter. This param- 
eter associates the file with a "articular set: all files in the set must reference it. Also, mfn cannot be used in 
any I/O request except as the M parameter in LABEL or POSMF requests. 

RING/NORING parameters on REQUEST for the multi-file set determines the RING status for all processing 
of that set. RING/NORING parameters are ignored on LABEL used to position a multi-file set. 

On REQUEST, the MF parameter designates the first parameter to be a multi-file name rather than a logical 
file name. The U parameter causes standard labels to be produced. Other parameters should establish tape 
density and format for the entire multi-file set. On LABEL, density and format parameters are ignored. 
REQUEST can include a VSN parameter. 

LABEL is recommended for each file. In addition to required lfn and M parameters, optional parameters 
describing file header fields can appear. If a position number is not given with the P parameter, it is assumed 
to be one larger than that of the previous file; and the new file is written at the end of the current set. 
When an L parameter is used in creating a file header, future jobs can access the file by label name. 

To access a labeled multi-file set, a REQUEST control statement is needed to attach the set to the job. A 
LABEL control statement (either U or Z) need appear only for the file to be accessed. For example, to 
access the third file on a volume, use the following statements. 
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REQUEST(MANY,MF,U,NORING . . . ) 

LABEL(FILE3,R,M=MANY,P=3, . . . ) 

When an R is specified on a LABEL statement, the set is positioned according to the P parameter, an OPEN 
function is issued to read the label, and the contents are checked against any corresponding parameters on the 
LABEL statement. Use of L instead of P causes the tape to be searched for a matching label name. If a 
match cannot be found, a message, FILE NAME NOT IN MULTI-FILE SET, is issued and processing stops. 
The same message appears also when neither P nor L is given and the end of the device set is encountered. 
When R is not specified, the next file in the set is opened when P and L are both omitted. 

Writing on a multi-file can be done at the end of the existing set. At some point prior to the end, existing 
files can be overwritten. For example, to create a new file LASTONE, use 

LABEULASTONE,W,M=MYSET,L=LAST) 

Since P is omitted, the label is written at the end of existing files and given a position one greater than the 
last file. 

If a position number is given when a label is to be written, the file is positioned as requested. If a label 
exists at that point, its expiration date is checked. A new label is not written over the existing one unless it 
is expired or the operator authorizes writing over an unexpired label. Since rewrite-in-place is not defined for 
tapes, rewriting a file label destroys access to the associated file and all files following it on the tape. 

The assignment of a multi-file can proceed automatically with the use of a VSN under the following conditions: 

A VSN statement or parameter equates the multi-file name to the physical volume of tape. 

VSN(mfname=1234) 

or 
REQUEST(mfn ,VSN=1234) 

A REQUEST statement is used to assign the multi-file name to the job. 

REQUEST(mfname,MF) 

A LABEL statement is used to identify the specific file by label name, equate the file to the logical file 
name, and identify the file as being a multi-file set member. 

LABEL0fn,M=mfname,L=lfn, ) 

Once the multi-file name has been assigned to the job via the REQUEST statement, any file can be accessed 
individually via the LABEL statement. The execution of a new LABEL statement automatically prevents the 
preceding labeled file from being accessed. 

USAGE SUMMARY 

Magnetic tape files to be used or created by a job must be explicitly requested. The three control statements 
involved are REQUEST. LABEL, and VSN. 

The REQUEST statement can be used for all tape files (labeled, unlabeled, single file, or multi-file set). 
Parameters, in addition to specifying format and density, can specify processing for the file. Identifying the 
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tape as input or output and the type of label is sufficient to initiate label processing and checking when the 
file is opened. The installation default options for unloading, label processing, and parity error processing can 
be overridden. A volume serial number parameter for the volume (or first volume in multi-volume file) allows 
the system to assign the file automatically. 

The LABEL statement can be used in place of a REQUEST statement for a labeled, single file volume and to 
write or check file header labels on single or multi-file volumes. Parameters establish label type and whether 

*««~ iu a.* v .v ^w ivdu wi mUivIi, x iviub lix illv ll^dubi ^rii^ivi/ laucia ttic Wllltcil Ui cHcukcu at;t;urujjig tu uie 

values specified. If a multi-file volume is to be labeled, a REQUEST statement must first establish the 
multi-file name, then a LABEL statement can exist with the name and label field values for each file in the 
set. With LABEL, either a volume serial number or a label name can be given for identification for automatic 
tape assignment purposes. Automatic assignment by label name applies only when the read (R) parameter is 
specified by LABEL. The LABEL statement also can be used to position to a particular member of a multi- 
file set. 

A LABEL statement can follow a REQUEST statement for the same file. Conflicts in parameters are resolved 
in favor of the REQUEST statement. Unresolvable conflicts are referred to the operator. 

The VSN statement can be used to equate a file name with a. volume serial number so that the system can 
assign a mounted tape automatically when it is requested by a REQUEST or LABEL statement or function. 
The VSN for multi-file set or for alternate volumes can be stated. Since the system accepts the first VSN 
equated to a file name, a VSN preceding a REQUEST or LABEL statement overrides any VSN value or 
supplies the omitted parameter. This VSN information is independent of label information. It is not written 
or checked against label fields. 

Automatic tape assigning capabilities, which are selectable by installation options, speed job throughput when 
the programmer supplies information to allow assignment of mounted tapes without operator action. The 
system searches first for an eq parameter, then a VSN parameter, then a label name from among the control 
statements. If both the VSN and label name parameters are specified, only the VSN is used for automatic 
assignment. However, label verification proceeds separately and inconsistencies are brought to the attention of 
the operator for action. The operator has the option of assigning a VSN to a tape when it enters the system 
if such identification was not made by the programmer. 

Only the VSN statement allows multi-volume file identifiers or alternate tape volumes to be specified. Use of 
the VSN statement is recommended when a job's tape file requirements change frequently. 

If more than one VSN parameter is given for a single file, the first encountered is accepted. Therefore, 
deliberate duplication provides the programmer with the ability to override, for example, a REQUEST function 
specification within a program without changing the program. 

The maximum number of tape drives a job uses at any time is specified by the MT (7-track) and NT, HD, 
PE, and GE (9-track) tape parameters on the job statement. Specifying more tapes than are needed can delay 
execution of a job. The greatest delay results from specifying a number of tapes when the job does not use 
any tapes. Specifying fewer tapes than needed causes the job to abort. Depending on installation options 
for tape scheduling and default density (see the NOS/BE Installation Handbook), for 9-track tapes, the job 
statement density request and the density specified on the LABEL or REQUEST statement must be the same. 
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PRINT FILES 

Print files contain a disposition code indicating printer output. The file OUTPUT always is a print file. 

Print files must have the following characteristics. 

Characters must be in 6-bit display code (IC=DIS) or 8-bit ASCII (IC=ASCII). IC is declared with the 
ROUTE control statement or macro. Default is DIS. Files to be printed with an extended print train 
(more than 64-character character set) must be in ASCII. 

The end of a print line must be indicated by a zero byte in the lower 12 bits of the last central 
memory word of the line. Any other unused characters in the last word should be filled with binary 
zeros. For example, if the line has 137 characters (including the carriage control character), the last 
word would be aabbccddeeffggOOOOOO in octal; the letters represent the last seven characters to be 
printed in the line. No line should be longer than 137 characters. 

Each line must start at the high order end of a central memory word. 

The first character of a line is the carriage control, which specifies spacing as shown in the following 
table. It is never printed, and the second character in the line appears in the first position. A maximum 
of 137 characters can be specified for a line, but 136 is the number of characters that is printed. 
Table 3-3 shows carriage control characters. 

When the following characters are used for carriage control, no printing takes place. The remainder of 
the line is ignored. 

Character Action 

Q Clear auto page eject (JANUS default) 

R Select auto page eject 

S Clear 8 vertical lines per inch 

T Select 8 vertical lines per inch 

PM Output remainder of line (up to 30 characters) on the B display and the 

dayfile and wait for the JANUS entry/OKxx 

V Specifies a new carriage control array to be loaded for a 580 printer 

The remaining carriage control characters do not inhibit printing. Only the carriage control character 
is not printed. Any pre-print skip operation of 1 , 2, or 3 lines that follows a post-print skip operation 
is reduced to 0, 1 , or 2 lines. 

The functions S and T should be given at the top of a page. In other positions S and T can cause 
spacing to be different from the stated spacing. Q and R need not be given at the top of a page as 
each causes a page eject before performing its functions. 
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TABLE 3-3. CARRIAGE CONTROL CHARACTERS 



Character 


Action Before Printing 


Action After Printing 


A 


Space 1 


Skip to top of next page* 
Skip to last line of page* 


B 


Space 1 


c- 


Space i 


Skip to channel 6 


D 


Space 1 


Skip to channel 5 


E 


Space 1 


Skip to channel 4 


F 


Space 1 


Skip to channel 3 


G 


Space 1 


Skip to channel 2 


H 


Space 1 


Skip to channel 1 1 


I 


Space 1 


Skip to channel 7 


J 


Space 1 


Skip to channel 8 


K 


Space 1 


Skip to channel 9 


L 


Space 1 

Skip to top of next page* 


Skip to channel 10 


1 


No space 


2 


Skip to last line on page 


No space 


3 


Skip to channel 6 


No space 


4 


Skip to channel 5 


No space 


5 


Skip to channel 4 


No space 


6 


Skip to channel 3 


No space 


7 


Skip to channel 2 


No space 


8 


Skip to channel 1 1 


No space 


9 


Skip to channel 7 


No space 


X 


Skip to channel 8 


No space 


Y 


Skip to channel 9 


No space 


Z 


Skip to channel 10 


No space 


+ 


No space 


No space 


(zero) 


Space 2 


No space 


- (minus) 


Space 3 


No space 


blank 


Space 1 


No space 


'The top of a paj 


;e is indicated by a punch in channel 1 of t 


le carriage control tape. The 


bottom of page 


s channel 7. 


: 
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The V function can be used when assigning output to a 580 printer with programmable format control. Such 
a printer does not use carriage control format tapes; instead it contains a microprocessor plus memory. 
Programmable format arrays are loaded into this memory, performing the same function as the format tape. 
System defined arrays are available for use (see the ROUTE control statement in section 4); however, the 
V function allows a user-specified array to be used. When V is the first character of the line, 6, 8, or C may 
be specified as the second character. Other characters invalidate the function. If the second character is 
6, 6-line per inch spacing is indicated. If the second character is 8 or C, 8-line per inch spacing is indicated. 
An 8 means that the entire array is contained on one line, and a C means that two lines are used. When 
| two lines are used, there are no restrictions as to how the array is split, but both lines must begin with the 
characters VC. The data starting in column 3 defines the format array to be used in subsequent printing. 
The alphabetic characters A through L, the letter 0, and blanks are specified to indicate the following. 

Character Significance 

A Top of forms code; the array must begin with an A. 

B Channels 2 through 11, respectively. Other carriage control characters contained 

through in table 3-3 are used to skip to these channels. Therefore, each of these letters 

K should be specified at least once in the array. 

L Bottom of forms code. 

O End of the array; must be specified as the last character in the array. However, 

it does not correspond to any line on the form. 

| blank No channel. Blanks increase the number of lines on the form. 

Any other characters are illegal and invalidate the array. 

| Regardless of whether the array is contained on one or two lines, a maximum of 132 characters plus the end 
of array terminator is allowed in a 6-line per inch array, and a maximum of 176 characters plus the end of 
array terminator is allowed in an 8-line per inch array. An array may be less than the maximum length since 
the printer loops on what is specified, even if it is not a full page. 

NOTE 

Specifying a V (with 6, 8, or C) does not imply that 6- or 8-line per inch mode will be 
selected. If the user desires to change this mode, the S or T carriage controls must be 
used. If an array is indicated in a mode other than that previously specified by the S or T 
carriage controls, the array is ignored until the S or T carriage controls are used to change 
that mode. 

If the V carriage control is specified and the printer is not a printer with programmable format control, the 
printer page ejects and does not print the line(s). 
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The following examples illustrate typical carriage control output and its effect. 

1. column 1234567890123 456789012 34 
array V6A BCD EFGHI JK 

This causes the 6-line per inch buffer to be loaded with a 22-character array, implying a 21 -line form. 

2. column 12345678901234 
array V8 ABCDEFGHI J KO 

This causes the 8-line per inch buffer to be loaded with an 11-character array, implying a 10-line form. 

3. column 12345678901234567 
array VCA B D C 

VC E F G H I JK 

This causes the 8-line per inch buffer to be loaded with a 22-character array, implying a 21 -line form. 

4. column 1 2345 6 
array V6BCDO 

This is invalid because the array does not begin with an A. 

5. column 123456789 
array VBA C DEO 

This is invalid because the second character is not a 6, 8, or C. 

6. column 12345 6 
array V8ABWC 

This is invalid because W is an illegal character and the array does not end with an 0. 
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JOB CONTROL STATEMENTS 



m . *, -+a-«- j__ :i +t,« «««+^«i ^ n ^man+c ortr*ii^*jKl/> +r* nrntrraiTi flYppiitinn and file manipulation. Utilities 

are also presented. The first statement described is the job statement that begins the job. Remaining control 
statements are in alphabetical order. 

In the formats that follow, uppercase letters indicate constants and lowercase letters indicate values to be 
supplied by the user. Equal signs and slashes are required where they are shown within a parameter field. 

CONTROL STATEMENT SYNTAX 

All control statements, except the job statement that begins a job, have the same general format. They begin 
with a verb and are followed by parameters separated by separator characters. A terminator must follow the 
last parameter or the verb when no parameters are given. Blanks within the parameter list are ignored, except j 
possibly on the ACCOUNT statement (depending on the installation). 

Verbs 1-7 letters or digits that indicate the operation to be performed. Leading blanks 

can appear before the verb. The first character must be a letter. A blank 
immediately following the verb serves as a separator. 

Separators A separator is any character with a display code value greater than 44B, except 

* ) . $ and blank. (A blank can be used to separate the verb from the first param- 
eter.) The comma and left parenthesis are preferred separators. See appendix A 
for display code, values. 

Parameters Parameter format and order depends on the individual control statements, as 

described below. Some parameters have more than one field. Fields within 
parameters are separated by = / or commas. 

If a parameter field includes characters other than letters, digits, or asterisks, it must 
be written as a literal. A literal is a character string delimited by dollar signs. 
Blanks within the literal are significant. If the literal is to contain the character 
$ , two consecutive dollar signs must be written. The literal $A B$$41$ is inter- 
preted as A B$41. 

Terminators Terminators are the characters period and right parenthesis. 

Any characters after the terminator are treated as a comment. They appear on the job dayfile when the con- 
trol statement is listed. 

Certain control statements can be continued on one or more cards or lines. These statements are specifically 
noted in the following descriptions. (See the appropriate product reference manual to determine which system 
programs allow continued control statements.) In general, the last non-blank character of the card or line to 
be continued must be a separator, and the verb and parameter fields cannot be split between cards or lines. 
The final card or line must contain a terminator. 
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NOTE 

In a system using the 64-character set, colons should not be 
used in a control statement except within a literal. (A single 
colon is permitted in a literal.) Two or more consecutive 
colons could give incorrect results because the operating 
system uses 12 zero-bits (equivalent to two consecutive colons) 
to signify the end of a control statement. 

| Control Statement interpretation is described in section 7. 
JOB STATEMENT 

A job is identified, certain resources are requested, and processing priority levels are established with the job 
statement. In addition, the installation might require accounting information on this statement. The first 
statement in a job deck or in a file to be submitted for batch execution must be the job statement. Any 
other statement in this position is presumed to have job statement parameters and is interpreted accordingly. 

One parameter, the job name, is required on all job statements. Other parameters can be included to specify 
resources, priority levels, or processing time limitations. If these parameters are omitted, the operating system 
automatically assigns the system default values established when the operating system was installed. Parameters 
can be listed in any order following the job name. 

All blanks and any unknown parameters that appear on the job statement are ignored. However, when 
improper characters are used as variables with valid parameters, the job is terminated. For example, parameters 
such as CM7FFF and DATA would cause job termination since CM must be followed by digits only and D 
followed by two letters and one or two digits. 

A 26 or 29 can be punched in columns 79 and 80 of the job statement to indicate whether the statements 
following are punched in 026 or 029 character codes. The default mode depends on an installation option 
(see appendix A). 

All numbers on job statements (except 26 or 29 in columns 79 and 80) are presumed to be octal values, 
unless changed by the system analyst when the operating system is installed at the user's installation. 

The format of the job statement is: 

name,Tt,IOt,CMfl,ECflJPp,Dym^lTk^[Tk,HDkJ > Ek,GEk,CPp,STmmf. 

After the terminator following the last parameter, general comments, or installation defined material 
such as accounting information, can appear. 

name Name the user assigns to the job to identify it to the operating system. Any com- 

bination of digits or letters can be used. The first character must be a letter. A 
name longer than five characters is truncated to five. 
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The operating system modifies the name of every job by assigning letters and digits 
that differ for each job as the sixth and seventh characters. This ensures unique 
identification if a job is entered with a name duplicating that of another job already 
in process. For example, if two jobs are named JOBNAME, one might be processed 
as JOBNA23 and the other as JOBNA34. If a job name contains fewer than five 
characters, all unused characters through the fifth are filled with zeros before unique 
sixth and seventh characters are added. 

Tt t is an octal value for the time, in seconds, for which the user estimates his job 

requires the central processor. It must include the time required for assembly or 
compilation. It does not include time during which the job is in the input queue 
or in central memory but not using the central processor. If the job access to the 
central processor exceeds the value specified by t , the job is terminated abnormally. 
(Use of the RECOVR feature in a program allows results of execution to that point 
to be recovered before termination.) 

t cannot exceed five digits. An infinite time can be specified by 77777 or 0. The 
job proceeds until completed even if it exceeds the installation maximum value for 
t. An infinite time limit should not be used mdiscriminately since certain kinds of 
program errors, such as an infinite loop, can result in great waste. 

IOt t is an octal value for the time, in seconds, which the user estimates his job requires 

for input/output. Although t cannot exceed five digits, an infinite time limit can 
be specified by 0. The default limit is infinite but can be changed by the installation. 
If the job input/output time exceeds the value specified by t , the job is terminated 
prematurely. (Use of the RECOVR feature in a program allows results of execution 
to that point to be recovered before termination.) 

CMfl fl is the maximum field length (octal number of central memory words) that the job 

requires. 

When the CM parameter is specified, that amount of storage is allocated to the job 
throughout execution, unless the job itself requests a smaller amount by a REDUCE 
or RFL statement. If the CM parameter is not used, the system establishes field 
length requirements for each step of the job, expanding or contracting it as necessary. 
Since smaller field lengths are used whenever possible, more jobs can pass through the 
system in a given time period. 

The system library programs, including the loader, compilers, and utilities, have an 
associated field length in the library tables. The field lengths are set by the installation 
to a judicious length for typical jobs, which should eliminate the need for the CM 
parameter on many job statements. 

Any CM parameter on the job statement is rounded upward to a multiple of 100. The 
highest permissible value is defined by the installation for a given mainframe. An RFL 
control statement requesting a field length greater than the CM value on the job state- 
ment causes job termination. The RFL limit is the installation field length maximum 
if CM is not on the job statement. 
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ECfl fl is the maximum amount (octal) of direct access ECS the job needs in multiples 

of 1000-word blocks. The highest value permitted is defined by the installation. 
An installation default amount (typically zero) is assigned if the parameter is 
omitted and subsequent MEMORY requests from user programs are not allowed to 
exceed that amount. 

The EC parameter is applicable only to user programs in which ECS is accessed 
through hardware block store instructions. It is not applicable to files stored on 
ECS or buffered through ECS. 

Pp p is the priority level (octal) requested for a job. The lowest executable priority 

level is 1. If zero is given for p , the system treats it as level 1. The installation 
determines the highest value permitted, but it never can exceed 7777 (octal). A 
value greater than the highest permitted value defaults to the installation default. 

Dym This parameter is used only in conjunction with a string of interdependent jobs, 

y is the dependency identifier (two alphabetic characters) assigned by the user to 
the entire string, m is the dependency count (number) of jobs (0-77 octal) upon 
which this particular job depends. Examples using the D parameter are presented 
in the discussion of the TRANSF statement. 

MTk MT specifies 7-track tape. GE, PE, HD, and NT specify 9-track tapes with the 

NTk following densities. 

HDk 

PEk GE 6250 cpi [679 group coded recording (GCR) unit only] 

GEk PE 1600 cpi 

HD 800 cpi 

NT Installation-selected default density 

k is the maximum number of 7-track or 9-track tape units a job will require at any 
one time, k can range from to 77 (octal) but cannot exceed the total number 
of tape units at the computer site. If more tape units are required at any time during 
job execution than are specified by k , the job will be terminated. 

Depending on the installation option for tape scheduling, the following rules for 
specifying density and k apply. If the installation has selected the schedule-by- 
density option, three separate counts according to density are maintained for each 
job (for example, the number of GE tape units is counted separately from the 
number of HD tape units). If the installation has not selected the schedule-by- 
density option, only one count of 9-track tape units is maintained. 

A job can use more than a total of k tape units as long as their use is not simultaneous. 
For example, if MT3 is specified, 7-track tape units A, B, and C are assigned to the 
job, and an UNLOAD but not a RETURN function is issued for the tape unit C, tape 
unit D can be requested for the job. This makes a total of four tape units used during 
the entire job. 

CPp This optional parameter is applicable only to systems having more than one central 

processor. Use of the CP parameter restricts the job to executing only on the specified 
processor. Omission of the parameter allows the system to select the processor for 
job execution; usually, both processors will be used during the execution of any pro- 
gram, p can be A or B. 
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On a CDC CYBER 174; CYBER 71-2x, 72-2x; CYBER 73-2x; or 6500 system, the 
parameter restricts job execution to one of the two identical central processors. In 
general, such a restriction serves no benefit. However, it is useful for running CPU 
diagnostic programs. 

On a CDC CYBER 74-2x or 6700 system, the two processors operate at different 
speeds. CPA restricts the job to the faster processor, and CPB restricts it to the 

!_ ^_^ is Iin 4-1..* *.** — m«.a4a V ir, nm!Mni4 4-\t n nirn+OOT* (^T^rt/IO^O +1l MctOr 

processor when it is available. 

STmmf This optional parameter specifies a three-character identifier (mmf) of the system on 

which the job is to be run. For multi-mainframe environments, ST should be used 
to ensure that a string of interdependent jobs is executed in the same mainframe. 

Examples of job statements: 

JQBA10O,T400,CM450O0,EC2,Pl,DAB3,MT5,CPA. THE JOB NAME IS TRUNCATED TO JOBA1 

K2S1. ALL DEFAULT VALUES ARE AUTOMATICALLY ASSIGNED 

TLS,T777,IO777,CM50000,EC5,NT2,Pl ,MT1 . 

JOB4,T77777,IO0,NTl. THIS JOB HAS INFINITE CENTRAL PROCESSOR AND I/O TIME 

ABS (ABSOLUTE CENTRAL MEMORY DUMP) 

ABS dumps absolute addresses of central memory whether or not the addresses are within the field length 
assigned to the job. Installations can prohibit absolute dumps. ■ 

The format of ABS is: 

ABS,from,thru. 

When only one parameter appears, it is presumed to be the thru parameter, and the dump starts at 
address 0. When both parameters are present, thru must be greater than from. 1 

from Address at which dump is to begin, 1-6 digits octal. 

thru Address at which dump is to end, 1-6 digits octal. If the value exceeds the size of 

memory, dumping stops at the end of memory. 

The format of the output on file OUTPUT is the same as that produced by the DMP control statement. ABS 
can also be called using the SYSTEM macro described in section 7. I 

ACCOUNT (ACCOUNTING INFORMATION) 

ACCOUNT supplies accounting information. The installation determines what accounting information is 
required and what can be optionally specified. Depending on the installation, the ACCOUNT control state- 
ment might be required immediately after the job statement and it might be allowed or disallowed elsewhere 
among the control statements. 
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The format of ACCOUNT is: 

ACCOUNT.parameter list. 

The dayfile message indicating the execution of ACCOUNT might be edited so that sensitive information is 
deleted. Illegal accounting information might cause job termination. 

Some installations require accounting information on the job statement instead of the ACCOUNT control 
statement. Others might not require any such accounting. 



ADDSET (CREATE MASTER DEVICE OR ADD DEVICE 
TO PRIVATE DEVICE SET) 

ADDSET adds members to a device set. It can be used to create a master device when parameters MP and 
VSN indicate the same volume serial number. Members being added must have the same device type as the 
master device (see LABELMS). ADDSET cannot be entered through INTERCOM. 

A member device is added to an existing device set when parameters MP and VSN specify different volume 
serial numbers. A MOUNT statement for the master device must be issued before ADDSET can be used to 

add a member device. 

The format of ADDSET is: 

ADDSET^N=setaame^MP=mpvsn,VSN^sn,UV^v,UP^p^B^bJR=fff^F=nJ^=mJRP==ddd,*PF^node. 

Parameters SN, MP, and VSN are required. If parameters MP and VSN are equal, parameters UV, UP, 
PB and FR are required unless the installation defines defaults. All parameters are order independent.' 



SN=setname 

MP=mpvsn 

VSN=vsn 

UV=uv 
UP=up 



PB=pb 



Name of device set created or device set to which a member is added; 1-7 letters or 
digits beginning with a letter. Required. 

Volume serial number of master device; 1-6 letters or digits, leading zeros assumed. 
Required. 

Volume serial number of device being added; 1-6 letters or digits, leading zeros 
assumed. Required. 

Universal password; 1-9 letters or digits. 

Universal permission; any non-null combination of the characters C, M, E, and R, 
which specify the following permissions. 

C Control permission 

M Modify permission 

E Extend permission 

R Read permission 

Public password; 1-9 letters or digits. 
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FR=fff Permanent file default retention period specifying the number of days permanent I 

files on this private set are to be retained; 0-999. The private set owner determines 
the future of each file once the retention period expires. I 

NF=n Maximum number of permanent or queue files that can exist on the device set. 

Value of n cannot be less than one nor greater than 16000. 

NF=n has meaning only for an ADDSET for a master device. Default is 300 (octal). 

NM=m Maximum number (decimal) of members allowed in the device set. NM=m is used 

by ADDSET to preallocate tables for the member devices on the master device 
system. For each member RBR, the system needs one PRU if the RBR is less than 
62 words long, or two PRUs otherwise. For system tables ADDSET reserves a 
number of PRUs equal to twice NM. If each member device is to have several RBRs, 
NM=m should be specified as somewhat larger than the actual number of member 
devices. NM=m has meaning only for an ADDSET of a master device. Default is 
50 (decimal). 

RP=ddd Retention period for the device set. ddd must be decimal (0 to 999) indicating the 

number of days before the device set expires. 999 indicates an infinite retention 
period. RP=ddd has meaning only for an ADDSET of a master device. Default is 
31 days. 

*PF Permanent files can reside on this member of the device set. Although the master 

device need not be a permanent file device, at least one device in the device set 
must be a permanent file device. 

mode Recording mode for an 844 disk pack. Default is specified by the installation. 

HT Half track; read/write alternate sectors. 

fi i uii tiav^iv, loau/wiitc acijuciikicu Scviuio. 

NOTE 

If FT is specified, 2xPPU speed must be in effect 
and there must be full track controller access to 
the drive on which the pack resides. 

ALTER (CHANGE PERMANENT FILE LENGTH) 

ALTER changes the end-of-information for an attached permanent file. End-of-information is set at the end 
of the PRU at which the file is currently positioned. ALTER is identical to the EXTEND control statement 
when new information has been written to the fde and the current file position is at the end of the new 
information. 

ALTER requires exclusive access to the file; an RW=0 parameter on the ATTACH control statement provides 
exclusive access. The permissions required depend on whether the file is being lengthened or shortened. 
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Extend permission is required to extend the file length. 

Modify and extend permission are required to reduce the file length. 

The format of ALTER is: 

ALTEIUfh. 

lfn Logical file name of attached permanent file, 1-7 letters or digits beginning with a 

letter. 

ATTACH (ATTACH PERMANENT FILE TO JOB) 

ATTACH attaches a permanent file to a job, as long as parameters specified on the ATTACH control statement 
establish the right to use the file. Subsequent operations allowed on the file depend on the passwords sub- 
mitted. Turnkey, read, modify, extend, or control permission is granted only when the appropriate passwords 
are specified. In a multi-mainframe environment, the permanent file must reside on a device directly connected 
to the mainframe on which the job is executing. 

When the file is attached to the job, its initial position is beginning-of-information. 

The format of ATTACH is: 

ATTACH4fn,pfn,II>^ame,CY=cy^C>^c,I£=n^MR=m4 > W==pw,UV==uv^.W=p,SN=setname. 

The first parameter establishes the logical file name. Parameters lfn and pfn are required in the order 
shown; all others are optional and order independent. ATTACH can be continued. If a period or right 
parenthesis does not appear at the end of the parameter list, column 1 of the next statement is con- 
sidered to be a continuation of column 80. 

lfn Name by which file is to be known as a local file, 1-7 letters and digits beginning 

with a letter. If omitted or null, the first seven characters of the pfn establish lfn. 

pfn Permanent file name by which the file is known in the permanent file manager tables, 

1-40. letters or digits. If omitted, lfn must be the same as the permanent file name. 

ID=name ID parameter by which the file was cataloged. Required unless the file was cataloged 

with ID=PUBLIC. 

CY=cy Cycle number to be attached; 1-999. Default is highest existing numbered cycle. 

EC=ec Size of buffer for sequential public device set file (octal). EC is ignored when SN is 

specified. 

ec Buffer Size 

K Installation standard number of blocks of ECS. 

nnnn Number of 1000 (octal) word blocks to be allocated. 

nnnnK Same as EC=nnnn. 

nnnnP Number of ECS pages, with a page 1000 (octal) central 

memory words. 
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LOn Lowest cycle indicator; n must be any non-zero value. CY overrides LC except when 

CY=0. 

MR = m jvcau-oniy permission request; any stngiS non-zero uigit. 

PW=pw 1-5 passwords, separated by commas, for permissions required in this job. Passwords 

„. s A~t-.~ S A Ui, +V.a r'M TV Dn Un tJY no.-oma+aro r.f +}.« PATAKV! mntrnl 
ai*£ uciillSu vy uiv v^ii iu< j.xj~t« at-ia^, 4^1 t'aiuiavivi^ vi uiv vxnru.-vu vuuuui 

statement. 

UV=uv Universal password; 1-9 letters or digits. Grants universal permission. Password and 

permission for public sets are defined by the installation; for private sets, they are 
defined on the ADDSET statement when creating the master device. If this parameter 
is specified, PW parameters are ignored. 

RW=p Rewrite request. 

P Significance 

Job has exclusive file access if it has control, modify, 

or extend permission. 

Non-zero Job retains modify and extend permission; any control 

digit permission is cancelled. Other jobs can attach the file 

with MR=1 to read the file but cannot receive control 

permission. 

SN=setname Name of set on which file is cataloged, 1-7 letters or digits beginning with a letter. 

The master device of a private device set must be referenced on a MOUNT control 
statement before SN is used. If omitted the job's current permanent file default set 
is assumed (see SETNAME statement). I 

An ATTACH of an incomplete cycle must specify CY and any control password. 

AUDIT (PERMANENT FILE SUMMARY) 

AUDIT provides the status of permanent files. The user can restrict the AUDIT to an owner ID, permanent 
file name, or device set. 

AUDIT can run in either full mode or partial mode. Items contained in the printed reports of each of these 
modes are listed in table 4-1. 

The format of AUDIT is: 

AUDIT,LF=lfn^IO=m ) ID=name,PF=pfn, { JjJ J ,SN=setname,VSN=vsn,AC=n. 

All parameters are optional and order independent. If a terminator does not appear at the end of the 
parameter list, column 1 of the next card or line is considered to be a continuation of the AUDIT 
parameter list. 
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LF=lfn 



MO=m 



ID=naine 
PF=pfn 

AI=F 
AI=P 

SN=setname 

VSN=vsn 



Logical file name to receive the output listing created by AUDIT, 1-7 letters or digits 
beginning with a letter. Default is OUTPUT. 

AUDIT mode; only one of the following modes can be specified. 

m Mode 



A 

X 

D 

I 

P 

R 



AUDIT all files (default) 
AUDIT expired files 
AUDIT inactive cycles 
AUDIT incomplete files 
AUDIT files with parity errors 
AUDIT archived files 



AC=n 



Owner identification; audit all files with this identification. 

Permanent file name; audit all files with pfn. If PF=pfn is used, the ID=name param- 
eter must also be used. 

Full 2-line output for each file audited. Default. 

Partial l-line output for each file audited. 

Name of device set to be audited, 1-7 letters or digits beginning with a letter. Master 
device for this device must have been previously mounted. 

Volume serial number of device to be audited, 1-6 digits or letters with leading zeros 
assumed. All files residing on this device are audited. Master device for this device 
set must have been previously mounted. SN=setname parameter must also be 
specified. 

Account number; audit all files with this 1-9 character account number. 
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TABLE 4-1. ITEMS LISTED BY AUDIT 





All 
Files 


Archived 
Files 


Expired 
Files 


Files of 
Same ID 


Files on 

Specified 

Device 


Partial 

A lii 


Full Audit 
or Account 


Account Parameter 


X 


X 


X 


X 


X 


X 


X 


Creation Date (ordinal) 


X 


X 


X 


X 


X 


X 


X 


Cycle Number 


X 


X 


X 


X 


X 


X 


X 


Date of Last Alteration (optional) 


X 


X 


X 


X 


X 


X 


X 


Date of Last Attach (optional) 


X 


X 


X 


X 


X 


X 


X 


Expiration Date (optional) 


X 


X 


X 


X 


X 


X 


X 


Flags' 


X 


X 


X 


X 


X 




X 


Length Number of PRUs Deter- 
mined by Installation Parameter 


X 




X 


X 


X 


X 


X 
X 


Length in RBs 


X 




X 


X 


X 




X 


Number of Attaches 


X 


X 


X 


X 


X 




X 


Number of Extends 


X 


X 


X 


X 


X 




X 


Number of Rewrites/ Alters 


X 


X 


X 


X 


X 




X 


Owner ID 


X 


X 


X 


X 


X 


X 


X 


Permanent File Name 


X 


X 


X 


X 


X 


X 


X 


Set Name 


X 


X 


X 


X 


X 


X 


X 


Subdirectory Number 


X 


X 


X 


X 


X 




X 


Time of Last Alteration 


X 


X 


X 


X 


X 




X 


Time of Last Attach 


X 


X 


X 


X 


X 




X 


First VSN 


X 


X 


X 


X 


X 


X 


X 


VSN of Dump Tapes (firstAast) 


X 


X 


X 


X 


X 




X 


t Flags are: 














A Archived file E Pari 


ty erro 


r in file 


P Positioned file 








C RB conflict file N Nev 


v versio 


n file 


R Random file 














S CDC CYBER Re 


icord"Mana 


ger IS, I 


)A, or AK file 



BKSP (BACKSPACE SYSTEM-LOGICAL-RECORD) 

BKSP backspaces one or more system-logical-records on rotating mass storage, ECS, or SI format tape. Back- 
spacing terminates when beginning-of-information is encountered. 

The format of BKSP is: 

BKSP,lfh,n,C. 
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Parameters are positional; only lfn is required. 

lfn Name of file to be backspaced, 1-7 letters or digits beginning with a letter. 

n Number of system-logical-records to be backspaced, 1-262143 (decimal). Default is 1. 

C File to be backspaced is coded. Default is binary. 

CATALOG (CREATE PERMANENT FILE) 

CATALOG makes an existing local file a permanent file by creating entries in permanent file manager tables. 
A permanent file is known in these tables by a permanent file name unique within an owner ED. As many as 
five cycles can exist with the same permanent file name and ED but different cycle numbers. 

The local file must have all permissions in order for a new permanent file name and ED to be entered in the 
permanent file manager tables. When the first cycle of a permanent file is created, the values for XR, EX, 
CN, MD, TK, and RD define the passwords which are to be used in future references to all cycles of this 
permanent file. Consequently, these parameters are ignored for a new cycle catalog. Any control password 
or turnkey password defined must be specified with the PW parameter to create a new cycle of a permanent 
file. 

The local file must reside on a member of a public device set or on a member of a private device set desig- 
nated for permanent files. A *PF parameter on a REQUEST control statement prior to file creation ensures 
proper file residence. An SN parameter on the REQUEST determines the device set for the file. 

Once the file is cataloged, it remains available to the job as a local file with all permissions, unless the RW 
parameter or MR parameter cancels some permissions. 

The format of CATALOG is: 

CATAIX)G4fn,pfn,ID=^ame r AC=act,CY=cy,CN=cn^X==ex,FO=foJkID==md^lR=mJ , W=pw,RD=rd,RP=rp, 
RW=p,TK=tk,XR=xr. 

The first two parameters are required in the order shown. All other parameters are order independent. 
CATALOG can be continued. If a period or right parenthesis does not appear at the end of the 
parameter list, column 1 of the next statement is considered a continuation of column 80. 

lfn Logical file name by which file is presently known to the job, 1-7 letters or digits 

beginning with a letter. If omitted, the first 7 characters of pfn are assumed. This 
name does not become part of the permanent file identification. 

pfn Permanent file name by which the file is known in permanent file manager tables, 

1-40 letters or digits. If omitted or null, lfn becomes the permanent file name. 

ID=name Owner or creator of file; 1-9 letters or digits. Required unless the installation is 

cataloging the file with ID=PUBLIC. 

AC=act Account parameter, 1-9 letters or digits. Installation determines the procedure if 

act is incorrect or is not specified. 
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CY=cy 



CN=cn 



FO=fo 



MD=md 
MR=m 



Cycle number of file with same pfn/ID combination, 1-999. If omitted, illegal, or 
not unique, cycle number is one greater than highest existing cycle number. If a 
cycle 999 exists, automatic cycle number assignment cannot take place. 

Password for control permission (purge or catalog new cycle), 1-9 letters or digits. 

DoeciitM-n-zl frtr- avtAti/1 t"kAf*tr*iooi/-\r» 1 -O lAttAre nr Aiaitc 

File is CDC CYBER Record Manager IS, DA, or AK organization. Permissions are 
defined in terms of Record Manager logic; extend is equated with adding new records, 
modify with deleting or replacing records. If the file is not IS, DA, or AK organi- 
zation, this parameter is ignored. 

Password for modify permission, 1-9 letters or digits. 

Multi-read indicator. 



m 



non-zero 
digit 



Significance 

No other job can attach file while this job is in 
execution. Default. 

Other jobs can attach file immediately for read only. 



PW=pw 

RD=rd 
RP=rp 



Password list to obtain permissions. Control password is required to catalog a new 
cycle of the same pfn/ID. Public password is required to catalog a file with 
ID=PUBLIC. 

Password for read permission, 1-9 letters or digits. 

Retention period indicating the number of days file is to be retained, 0-999. Infinite 
retention is 999, although an installation might change this. Default is installation 
defined. Installation procedures determine the future of the file once the retention 
period expires. 



RW=p 



Rewrite request. 

P 




non-zero 
digit 



Significance 

Job has exclusive file access if it has control, modify, 
or extend permission. 

Job retains modify and extend permission; any control 
permission is cancelled. Other jobs can attach the file 
with MR=1 to read the file, but cannot receive control 
permission. 



TK=tk 



Password for turnkey required in addition to RD, MD, EX, or CN, 1-9 letters or 
digits. 
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XR=xr Password for modify, extend, and control permission, 1-9 letters or digits. Any MD, 

EX, or CN parameter overrides XR for the specified parameter only. 

When a file is cataloged with a pfn unique to the ID, these parameters are applicable. 

AC, CN, CY, EX, FO, MD, MR, PW, RD, RP, RW, TK 

When a new cycle is cataloged with the same pfn and ID of an existing permanent file, the new cycle has the 
same set of passwords as the original file. Any control permission passwords must be specified on the 
CATALOG that establishes a new cycle. These parameters are applicable to a CATALOG for a new cycle: 

AC, CY, FO, MR, PW, RP, RW 

Any permanent file parameter not applicable to CATALOG is ignored. 

CKP (CHECKPOINT REQUEST) 

CKP requests a checkpoint dump be taken during job execution. Each time a checkpoint dump is taken during 
job execution, a file is written containing information needed to restart the job at that point. The system 
numbers each checkpoint dump in ascending order. 

The format of CKP is: 

CKP. 

The checkpoint/restart system facility captures the total environment of a job on magnetic tape so the job can 
be restarted from a checkpoint, rather than from the beginning of the job. Total environment includes all files 
associated with the job. For mass storage files, the complete file is captured, including data from any ECS 
buffers and the relative position within that file. For magnetic tape files, only the relative position on the 
tape is captured so the tape can be properly repositioned during restart. (See the RESTART utility.) 

Checkpoint/restart cannot handle the following items. 

Rolled-out jobs 

Random files (except random permanent files) 

Multi-file volumes 

ECS resident files 

The job should request a dump tape with a REQUEST or LABEL control statement that indicates the tape is to 
be used for checkpoints. The tape must have SI data format and default density, but can be either 7-track or 
9-track and labeled or unlabeled. Either a 7-track or 9-track tape can be assigned by the operator when an MN 
parameter appears in REQUEST. Only one tape can be defined for checkpoint dumps per job. If no tape is 
supplied, checkpoint defines an unlabeled tape for its use at the time the checkpoint occurs with the following 
request statement. 

REQUEST > CCCCCCC,CK,MN,RING. 
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Checkpoint/restart defines the following files for its use. 

/-»/-w-irf-i/"n-u-* nrriorir'T r"'i"'f , /~ , /" , /" 1 Vf 

lAAAAAAs va*^vaA.i ^vAAA/V>M 

The user should refrain from using these file names. User system-logical-records should not have a level 16 D I 
since checkpoint uses level 16g for internal processing. * 

COMBINE (RECORD CONSOLIDATION) 

COMBINE consolidates one or more consecutive system-logical-records in one file into one level system- 
logical-record on a second file. COMBINE is applicable only to files with system-logical-record structure; 
files cannot be S or L tapes. COMBINE terminates at a partition boundary. 

The format of COMBINE is: 

COMBINEJfn 1 ,lfh 2 ,n. 

Parameters lfhj, and lft^ are required. 

lfn. File from which one or more system-logical-records is read, 1-7 letters or digits begin- 

ning with a letter. 

lf n? File to which one system-logical-record is written, 1-7 letters or digits beginning with 

a letter. 

n Number (decimal) of system-logical-records in lfiij to be written onto lfi^. Default 

is 1. 

The job is responsible for positioning of both files. 

COMMENT (ADD COMMENT TO DAYFILE) 

COMMENT inserts a formal comment into the job dayfile. Since the comment is displayed at the operator 
console as part of the job dayfile and the job continues, the operator might not see the comment. The 
PAUSE control statement should be used instead of COMMENT when the comment is to be brought to the 
attention of the operator, since PAUSE stops the job until the operator acknowledges the PAUSE. 

The format of COMMENT is: 

COMMENT.comment 

The period is required. The comment can begin in any column after the period; no ending punctuation 
is required. 

comment String of 72 characters. Any character can be specified, including those otherwise 

used as punctuation. 

Only the comment appears in the dayfile; the word COMMENT does not. The first 40 characters of the com- 
ment, including any leading blanks, appear on the first line. Any additional characters appear on a second line 
in the dayfile. 
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COMPARE (COMPARE FILES) 

COMPARE compares one or more consecutive system-logical-records in one partition with the same number of 
consecutive system-logical-records in a partition on another file. Comparison begins at the current position of 
each file and continues until the number of system-logical-records of the specified level or higher level has been 
processed from the first file. COMPARE terminates if a partition boundary is encountered. 

Files to be compared can reside on rotating mass storage, ECS, or magnetic tape. 

COMPARE can be used with an S or L tape when record size does not exceed PRU size for an SI tape. When 
a tape file is to be compared with a file not on tape, the tape file must be specified first in the COMPARE 
parameter list. 

The format of COMPARE is: 

COMPARER ,lfn 2 ,n,lev,e,r. 

Parameters lftijand lfn 2 are required; all others are optional. All parameters are order dependent. 

lf n . Name of file to be compared, 1-7 letters or digits beginning with a letter. 



1 



n Number (decimal) of system-logical-records of level lev or higher in lfrij, to be com- 

pared to lfti2- Default is 1. 

lev Record level number (octal). Default is 0. 

e Number (decimal) of non-matching word pairs to be written to the OUTPUT file for 

each non-matching record. Default is 0. 

r Number (decimal) of non-matching records to be processed during the comparison. 

Included in non-matching record OUTPUT file if the e parameter is given. Default 
is 30000. 

Both the contents of the record and the system-logical-record terminator must be identical for the utility to 
declare both files identical. When all pairs of records are identical, "COMPARE writes the message GOOD 
COMPARE to the dayfile; otherwise the message is BAD COMPARE. A discrepancy between levels of corre- 
sponding records is listed on OUTPUT, and the comparison is abandoned, leaving the files positioned imme- 
diately after the unlike record terminators. 

A bad compare produces a message on the file OUTPUT. When the e and r parameters are specified, 
information on OUTPUT can identify the non-matching records. The first record on each file is number 1 . 

COMPARE determines whether a tape file is binary or coded mode in the following way. File names are 
those of example 4 below. The first record of the first-named file (GREEN) is first read in binary mode. If 
a parity error occurs, the file is backspaced and re-read in coded mode. If another parity error occurs, the 
fact is noted in file OUTPUT, the corresponding record of the second-named file (BLACK) is skipped over, 
and the process begins again. If the coded read is successful, the corresponding record of BLACK is read in 
coded mode. If this record of BLACK produces a parity error, the facl is noted in file OUTPUT, and nothing 
further is done with that record. Each record of file BLACK is read in the same mode as that in which the 
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corresponding record of GREEN was successfully read, but if the record GREEN was unsuccessfully read in 
both modes, the record of BLACK is read in the same mode as the preceding record of BLACK. Once a 
record of GREEN has been read without error, following records of GREEN are read in the same mode until I 

a rhanap ic fnrrfA hv a naritv ftrrnr I 

Examples of COMPARE usage: 

1. COMPARE(RED,BLUE) 

Compares next system-logical-record on file RED with next record on file BLUE. 

2. COMPARECRED,BLUE,6) 

Compares next six system-logical-records. Each record level on file RED must have the same level 
as the corresponding record on file BLUE for a good compare. 

3. COMPARE(RED,BLUE ) 3,2) 

Compares two files from their current positions to and including the third following end-of-section 
mark having a level number of 2 or greater. 

4. COMPARE(GREEN,BLACK,3,2,5,1000) 

Comparison is the same as the previous example, but the first five discrepancies between correspond- 
ing words in the files plus their positions in the record are listed on OUTPUT. Positions are indi- 
cated in octal, counting the first word as 0. The limit of pairs of discrepant records to be read is 
1000. If two long files are compared, for instance, 20 might be used as the record parameter, so 
that a large number of discrepancies are described in detail, but if, through an error, the two files 
are completely different, an enormous and useless listing is not produced. Furthermore, the com- 
parison is abandoned if this limit is exceeded, and the files are left positioned where they stand. 

COPY (COPY TO END-OF-INFORMATION) 

COPY copies one file onto a second file until a double end-of-partition (empty partition) or end-of-information 
is encountered on the first file. If end-of-information is encountered on the first file, enough end-of-paritions 
are written on the second file to ensure that it has a double end-of-partition. 

Both files are backspaced past the last end-of-partition written unless a backspace is illegal on the device or 
end-of-information was encountered. 

The format of COPY is: 

COPY4fnj4fn 2 . 

Parameters are order dependent and optional. 

lfn. File to be copied onto lfn-, 1-7 letters or digits beginning with a letter. Default is 

INPUT. 
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hru File onto which lfn, is copied, 1-7 letters or digits beginning with a letter. Default 

is OUTPUT. 

COPY is intended for use with files residing on disk or on binary SI format tapes. COPY gives undefined 
results when used with S or L tapes or with labeled or coded tapes. 

COPY can be used with any CDC CYBER Record Manager file that resides on a PRU device, lfn, is copied 
through end-of-information or a double end-of-partition. File format is not changed, and FILE control state- 
ments are ignored (see the CDC CYBER Record Manager manuals). 

COPYBCD (COPY LINE IMAGE FILE) 

COPYBCD reformats files of line images. It is used most often to produce a tape file that can be listed off- 
line. Each line image of the input file is assumed to be terminated by a 12-bit byte of zeros in the lower 
order position of the last word of the line image. COPYBCD writes each line image as a 148-character 
record, with the zero-byte line terminator converted to blanks on the output file. 

When a partition boundary is encountered on the input file, a printer carriage control character for a skip to 
top of next page is written on the output file before an end-of-partition is written. Thus, the final printed 

uul^/ui Ul.giii3 wavn j/ai iiuvjii ai tnw- iuj/ wi a. uvn pagw. otiajr uiaiavt&ia appeal dl 1.11C IKjy Ul LiliS page aS A 

result of the skip and end-of-partition on the output file. 

The format of any output tape is determined by the REQUEST or LABEL control statement in the job. 

The format of COPYBCD is: 

COPYBCD,lfn 1 ,lfn 2 ,n. 

All parameters are positional and optional. 

lfti| Name of input file to be copied onto Mhj, 1-7 letters or digits beginning with a 

letter. Default is INPUT. 

lft^ Name of output file onto which lftij is to be copied, 1-7 letters or digits beginning 

with a letter. Default is OUTPUT. 

n Number of partitions (decimal) to be copied, 0< n <2 -1. Default is 1. 

COPYBF AND COPYCF (COPY BINARY AND CODED FILES) 

COPYBF and COPYCF copy binary files and coded files, respectively, to other files. The minimum field length 
for these routines is 5000 (octal). When L tapes are copied, the minimum is 1000 (octal), plus twice the 
length of the largest physical record to be copied. 

I COPYBF and COPYCF copy partitions delimited by level 17g record terminators on PRU devices (SI tapes and 
mass storage) and by tape marks on S and L tapes. Copy continues until the specified number of partitions 
has been copied or end-of-information is encountered. An EOF label on a tape multi-file set is considered to 
be end-of-information. An informative message is entered in the job dayfile when the copy terminates. 
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These utilities produce a file with a specific structure. If an exact duplication of the input file is required, 
COPY should be used. Alternatively, some appropriate sequence of COPYBR/COPYCR/COPYBF/COPYCF 
with explicit record or file counts, or other file positioning utilities can be used. 

The format of COPYBF is: 

COPYBF4fn 1 Jfn 2 ^i. 

All parameters are order dependent and optional. 

lfn. Name of file from which information is to be copied, 1-7 letters and digits beginning 

with a letter. Default is INPUT. 

lfn^ Name of file to which information is to be copied, 1-7 letters and digits beginning with 

a letter. Default is OUTPUT. 

n Number of partitions to be copied, 0<n <2* 8 -1 (decimal). 

The format of COPYCF is: 

COPYCF,lf ni ,lfn 2 ,n. 

Parameters are discussed under COPYBF. 

If an end-of-information is encountered on the input file before the number of partitions specified by the n 
parameter have been copied, the copy operation ceases (but not aborts) at that point. An end-of-partition is 
written on lfn~, and is not backspaced over. A dayfile message indicates the number of partitions copied 
before end-of-information was encountered. 

When these utility routines detect an end-of-volume for a tape, the next volume is requested, label checking/ 
writing is performed for labeled tapes, and the function continues normally on the next volume. 

When a file with system-logical-records is copied to an S or L tape, each system-logical-record becomes a 
physical tape block. Each level 17„ record delimits a partition. Similarly, when an S or L tape is copied to 
a PRU device, each physical record becomes a system-logical-record of level 0. A tape mark on an S or L 
tape delimits a partition. An informative message on the dayfile notes that levels 1 through 16g lose their 
level indicator on an S or L tape. 

For the record and block types indicated below, CDC CYBER Record Manager end-of-partition (EOP) is equivalent 
to a NOS/BE 1 end-of-partition. The routines COPYBF and COPYCF can be used to copy a specified number 
of partitions. All other considerations are the same as for copying system files. 



Device 


Block Type 


Record Type 


SI tapes and mass storage 


C 
K 


F,D,R,T,U,S,Z 
F,D,R,T,U,Z 


S and L tapes 


C 
K 
E 


F,D,R,T,U,Z 

FAR,T,U,ZT 
F,D,R,T,U,ZT 



tA copy from an S/L device to a system device might add extraneous system CDC CYBER Record Manager 
defined end-of -section terminators to a file. 
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Although not primarily implemented for that purpose, these routines are capable of limited format conversion. 
Table 4-2 shows format conversion copies that can be handled successfully. 



TABLE 4-2. COPYxx FORMAT CONVERSION 



Input 


Output 


SI Tapes and Mass 
Storage 


S Tape 


L Tape 


SI Tapes and 
Mass Storage 


Yes 


Yes lj 5 


Yes 2 > 5 


S Tape 


Yes 3 > 4> 5 > 7 


Yes 3 > 6 > 7 


Yes 3 > 6 > 7 


L Tape 


Yes 3 ' 4 ' 5 


Yes 3 ' 6 


Yes 3 - 6 


1 If the system-logical-record or L tape physical record is greater than 512 words, the copy terminates 
with an error message. 

2 If the system-logical-record is greater than the copy buffer size, the copy terminates with an error 
message. 

3 If the S tape physical record is greater than 512 words or the L tape physical record is greater than 
the copy buffer size, the system aborts the copy with an error message. 

4 If the S or L tape record is not a multiple of 10 characters, the last word of the system-logical- 
record is filled with zero bits; and an informative message is issued when the copy finishes. 

5 If a 9-track coded S or L tape is used, character conversion takes place. Four 8-bit characters on 
input convert to four 6-bit characters in memory. Four 6-bit characters from memory convert to 
four 8-bit characters on tape. An informative message concerning this conversion is issued when the 
copy finishes. 

6 If a 9-track coded S or L tape is used, character conversion takes place between files; and an informa- 
tive message concerning this conversion process is issued when the copy finishes. 

7 The largest 9-track tape record that can be copied by COPYBR or COPYBF is 3840 8-bit characters. 
A record of 5120 characters can be copied by COPYCR/COPYCF. 
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COPYBR AND COPYCR (COPY BINARY AND CODED RECORDS) 

COPYBR and COPYCR copy binary logical records and coded logical records, respectively, to output flies. 
The minimum field length for these routines is 5000 (octal). When L tapes are copied, the minimum is 1000 
(octal), plus twice the length of the largest physical record to be copied. 

COPYBR and COPYCR copy physical records on S or L tapes and system-logical-records on PRU devices (SI 
tapes and mass storage). Copy continues until the specified number of records has been copied or end-of- 
information or end-of-partition is encountered. An EOF label on a tape multi-file set is considered to be 
end-of-information. An informative message is entered in the job dayfUe when the copy terminates. 

These utilities produce a file with a specific structure. The last item on the output file is an end-of-partition 
that the utilities write and then backspace over. If an exact duplication of the input file is required, COPY 
should be used, as noted with the COPYBF and COPYCF utilities. 

The format of COPYBR is: 

COPYBR0fn 1 ,lfn 2 ,n. 

Parameters are order dependent and optional. 

lfn. Name of file from which information is to be copied, 1-7 letters or digits beginning 

with a letter. Default is INPUT. 

lfn 2 Name of file to which information is to be copied, 1-7 letters or digits beginning 

& with a letter. Default is OUTPUT. 

n Number of records to be copied, 0<n<2 18 -1 (decimal). Default is 1. 

The format of COPYCR is: 

COPYCR4fn,4fn 2 ^. 

Parameters are discussed under COPYBR. 

If an end-of-partition is encountered on the input file before the number of records specified by the n 
parameter have been copied, the copy operation ceases (but does not abort) at that point. An end-of-partition 
is written on the output file, but it is not backspaced over. A dayfile message indicates the number of re- 
cords copied before the partition boundary was encountered. 

A formatted FORTRAN write to a PRU device can produce more than one line per logical record. When 
COPYCR is used to copy the file to an S tape, the line images are not detected as separate records. 

When COPYBR or COPYCR is used to copy one S or L tape to another, each tape block copied is counted 
as a logical record and is converted to a system-logical-record level zero. Similarly, each system-logical-record 
of an input file becomes a physical record of an S or L format output file. 

When these utility routines detect an end-of-volume on a tape, the next volume is requested, label checking/ 
writing is performed for labeled tapes, and the function continues normally on the next volume. 



60493800 E 4-21 I 



If a partial logical record (a record not terminated with a system-logical-record mark) is encountered on the 
input file before an end-of-partition or end-of-information is encountered, information in the partial record is 
written to the output file as a logical record of level zero (or a physical tape block for an S or L tape). 

For the record and block types indicated below, CDC CYBER Record Manager end-of-section (EOS) is equivalent 
to a system-logical-record of level 0. The routines COPYBR and COPYCR can be used to copy a specified 
number of sections for these file structures. 

Device Bock Type Record Type 

SI tapes and mass storage C F,D,R,T,U,S,Z 

S and L tapes None; EOS and EOR 

are not equivalent 

For CDC CYBER Record Manager W type records, both end-of-section and end-of-partition are written as a 
system-logical-record of level 0. COPYBR or COPYCR can be used to copy a specified number of sections 
and partitions. In determining the number of records to be copied, the user should be aware that the 
operating system cannot distinguish between EOS and EOP defined for W type records. The copy terminates 
when the specified number of records has been copied or when EOI is encountered on lfn 1 . For W type 
records, COPYBR and COPYCR copy to end-of-information. 

See table 4-2 with the COPYCF utility for a list of successful format conversions. 

COPYN (CONSOLIDATE FILE) 

COPYN consolidates or merges files. System-logical-records from up to 10 binary input files can be extracted 
and written on one output file. Input can be from tape, card, or mass storage files. Output can be to a 
tape, card, or mass storage file. 

Directive statements on file INPUT determine the order of the final file. Several tapes can be merged to 
create a composite tape. A routine can be selected from a composite tape, temporarily written on a scratch 
tape, and transmitted as input to a translator, assembler, or programmer routine, eliminating the need for 
tape manipulation by the second program. In its most basic form, COPYN can perform a tape copy. 

The format of COPYN is: 

COPYN/,outlfn,inlfn 1 

Parameters are order dependent and required. Up to 10 inlfn parameters can be specified. 

f Format of output record. 

Copy records verbatim. 

non-zero Omit ID from record, 

outlfn Logical file name of output file, 1-7 letters or digits beginning with a letter, 

inlfn} Logical file name of input fife, 1-7 letters or digits beginning with a letter. 
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System-logical-records to be copied might or might not have an ID prefix table containing the name of the 
program or the name associated with the record. A record ID format consists of the first seven characters of 
the second word of each record. If records do not contain an ID, record identification directives must specify 
*!,„ r <>~ n -A ~,.~>u ar ftUo nncitinn nf tliA rcrnrA frnm thfi p.nrrfint nositinn of the fileV Records without an ID 

ULC 1C/WW1U uuiuuvi y^wiv £, v —...- ... ^-^w . ..... — ~.~..»..~ — . — .----.- . — — - . 



are copied verbatim to the output file. 

Cr,rT«Qt n f thf. hinarv innnt files demands on the storage media. A binary tape file consists of the information 
between the load point and a double end-of-partition. This file can contain any number of single end-of-partition 
marks. A mass storage file ends at end-of-information. A card file must be terminated with a 7/8/9 card. 

On the output file, a file mark for an output tape is written by using a WEOF statement in the desired 
sequence, or it can be copied in a range of records and counted as a record. 

Deck structure for a COPYN job in which all input files are other than INPUT: 

Job statement 

REQUEST statements as necessary 

COPYN call 

7/8/9 

COPYN directives 

6/7/8/9 

COPYN DIRECTIVE STATEMENTS 

Directive statements for COPYN use are REWIND, SKIPF, SKIPR, WEOF, and record identification statements. 
These statements are read from INPUT when COPYN executes. The directive statements are free-field. They 
can contain blanks but must include the separators indicated in each statement description. The ordering of 
the directive statements establishes the material written on the output file. Directive statements are written 
on the file OUTPUT as they are read and processed. When an error occurs, the abort flag is set, and the I 

. . . • ^ £V 11^ . - J U-- a — *" -'« «^:«*«^ «« f^TrTDTTT T*Uie ctQ+*»*v»a«t ie «rv+ r\rr*naGCf*A Kilt 1 

statement in error toiioweu oy an euui message is pmu™ uu uuuui. ims tuivuww •/• n^.. puwosvu, *,•** , 
an attempt is made to process the next directive statement. When the last directive statement is processed, 
the abort flag is checked, and if it is set, the job is terminated. Otherwise, control is given to the next con- 
trol statement. 



REWIND (REWIND FILE) 

The REWIND directive rewinds the named file. This file must be one of the input or output file names given I 
on the COPYN control statement, not the system INPUT file. 

The format of the REWIND directive is: 

REWINDQfn) I 

lfn Name of file to be rewound, 1-7 letters or digits beginning with a letter. 
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SKIPF (SKIP FILE) 

SKIPF skips forward or backward a designated number of partitions on a tape file. Requests for other types 
of files are ignored. No indication is given when SKIPF causes a tape to go beyond the double end-of-partition 
or when the tape is at load point. 

The format of the SKIPF directive is: 

| SKIPF(lfn,n) 

lfn Name of tape file to be skipped, 1-7 letters or digits beginning with a letter. 

n Number (decimal) of file marks to be skipped. +n skips forward n marks, -n skips 

backward n marks. 



SKIPR (SKIP RECORD) 

SKIPR skips forward or backward a designated number of records. With the exception of zero-length records 
and tape marks which must be included, requests for other types of files are ignored. 

The format of the SKIPR directive is: 

| SKIPROfn^i) 

lfn Name of tape file in which records are skipped, 1-7 letters or digits beginning with a 

letter. 

n Number (decimal) of records to be skipped. Zero-length records and file marks must 

be included in parameter n. 



WEOF (WRITE FILE MARK) 

WEOF writes a partition boundary on the named file. This file must be an output file named on the COPYN 
control statement. 

The format of the WEOF directive is: 

| WEOF(lfn) 

lfn Logical file name of file, 1-7 letters or digits beginning with a letter. 

RECORD IDENTIFICATION STATEMENT 

The record identification statement contains the parameters which identify a system-logical-record or set of 
records to be copied from a given file. 
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The format of the record identification statement is: 



fl'f2' r 3 
Pi 

P2 



First record to be copied or the beginning record of a set. Name associated with the 
record or a number giving the position in the file can be specified. 

Last record to be copied in a set of records: 

name 



decimal 
integer 



** 



System-logical-records Pj through P2 are copied. Pj must ^ 
located between p. and end-of-information. 

Number of records to be copied, beginning with Pj. Zero-length 
records and file marks are counted. Copying stops when the file 
end is encountered, even if the count has not been reached. 

p. through an end-of-partition are copied. 

p, through a double end-of-partition are copied. 

p. through a zero-length record are copied. 

Only Pj is copied. 

Input file to be searched. If Pj is a name, and p 3 is omitted, all input files declared 
on the COPYN statement are searched until the pj record is found. If it is not 
located, a message is issued. If p, is a number and p 3 is omitted, the last input file 
referenced is assumed. If this is the first directive statement, the first input file on 
the COPYN statement is used. 

Examples of record identification statements: 

SIN,TAN,INPUTA Copies all system-logical-records from SIN through TAN from file INPUTA. 

Copies 10 system-logical-records from file INPUTA, from SIN through SIN+9. 



or blank 



P3 



SIN,10,INPUTA 
SIN.TAN 

SIN„INPUTA 

1,TAN,INPUTA 

1,10,INPUTA 

1,*,INPUTA 



Searches all input files beginning with current file or first input file. When 
SIN is encountered, all system-logical-records are copied from SIN through 
TAN or until an end-of-partition is encountered. 

Copies system-logical-record SIN from file INPUTA. 

Copies the current system-logical-record through TAN from INPUTA. 

Copies 10 system-logical-records, beginning with the current system-logical-record 
on file INPUTA. 

Copies the current system-logical-record through the first file mark encountered 
on INPUTA. 
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FILE POSITIONING FOR COPYN 

Files manipulated during a COPYN operation are left in the position indicated by the previously executed 
directive. The file containing Pj is positioned at the record following p~. Other files remain effectively in 
the same position. 

When COPYN is searching for a named record and p., has been omitted, each input file is searched in turn 
until either the named record is found or the original position of the file is reached. The job INPUT file, 
however, is not searched end-around. 

In contrast to the end-around search, a copy operation does not rewind files. An end-of-partition terminates 
a copy even if the record named in p- has not been encountered. Since the output file is not repositioned 
after a search, COPYN can be re-entered. Therefore, the programmer is responsible for any REWIND, SKIP, 
or WEOF requests referencing the output file. 

COPYN does not check for records duplicating names on other files. If such records exist, the programmer is 
responsible for them. COPYN uses the first record encountered that matches the name on a directive 
statement. 

Examples of file positioning: 

1. Record identification statement: REC„INPUT1 



Input file 
INPUT1 



ABLE 


BAKER 




REC 


SIN 


TAN 


ZEE 


E E 

F F 



If INPUTA were positioned at TAN, TAN and ZEE would be examined for REC. The double 
EOP would cause ABLE to be the next system-logical-record examined, continuing until REC is 
read and copied to the output file. INPUT 1 would then be positioned at SIN. 

Record identification statement: RECA 



Input file INPUT 1, 
positioned at Bl 



Input file INPUT2, 
positioned at 
load point 











E E 


A1 


B1 




Z1 



F F 














E E 




A2 


RECA 


D2 



F F 





Input file INPUT3, 
positioned at 
load point 



A3 


B3 


C3 




Z3 


E E 

F F 



All records from Bl through Al are searched to find RECA; this repositions INPUT1 to Bl. A2 is 
searched, and when RECA is found, it is copied to the output file. INPUT2 remains positioned at 
D2. INPUT3 is not searched. 
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3. Record identification statements and binary records on INPUT file. Directive statements are: 

REC..INPUT 

JOBUOB3.INPUT 

ABLE..IN2 

7/8/9 

REC (binary) 

7/8/9 

JOB1 (binary) 

7/8/9 

JOB2 (bmary) 

7/8/9 

JOB3 (binary) 

7/8/9 

Because the INPUT file is not searched end-around, REC and JOB1 through JOB3 must directly 
follow the requesting record identification statements in the order specified by them. An incorrect 
request for an INPUT record terminates the job. 

COPYSBF (COPY SHIFTED BINARY FILE) 

COPYSBF adds a carriage control character to the beginning of each line during a copy to a second file. It is 
used with files to be printed when the existing first character is not a carriage control character. COPYSBF 
inserts a page eject character at the beginning of the first line. A blank is inserted at the beginning of sub- 
sequent lines to cause single spacing. A minimum field length of 10000 (octal) is required for COPYSBF, 

A tape input file must be binary. Each line must be terminated by a 12-bit byte of zeros in the low order 
position of the last central memory word of the record. 

The format of COPYSBF is: 

COPYSBF4fn 1 4fn 2 . 

Parameters are order dependent and optional. 

jf n Name of input file to be copied onto lfn 2 , 1-7 letters or digits beginning with a 

1 letter. Default is INPUT. 

lf n Name of output file onto which lftij is to be copied, 1-7 letters or digits beginning 

with a letter. Default is OUTPUT. 

COPYXS (COPY X TAPE TO SI TAPE) 

COPYXS converts a binary tape in X format to SI format. X tapes exist as a result of operating systems that 
are predecessors to NOS/BE 1. The binary X tape logical structure contains 512-word PRUs with short PRUs 
of sizes that are variable multiples of central memory words or 136 character PRUs. 
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The format of COPYXS is: 

COPYXS,xlfn,scplfn,n. 

Parameters xlfn and scplfn are required. 

x!™ Logical file name of input X tape, 1-7 letters or digits beginning with a letter. 

scplfn Logical file name of output SI tape, 1-7 letters or digits beginning with a letter. 

n Number (decimal) of partitions to be copied. Default is 1. 

COPYXS is used in the following manner. Both files must be requested as S format. 

REQUEST(xlfn,S) 

REQUEST(scplfn,S) 

COPYXS(xlfn,scplfn,n) 

The output tape is produced in SI format but is flagged in the system tables as S format. To read the output 
tape in the same job, the following control statements are needed. 

UNLOAD(scplfn) 
REQUEST(scplfn,MT) 

COPYXS cannot determine when end-of-information occurs on an X tape. Therefore, at least n partitions to 
be copied must exist on the X tape. Neither the input nor the output tape is rewound after conversion. 
After the requested number of partitions has been copied, the output tape is backspaced and positioned 
directly in front of the first tape mark preceding the EOF trailer label. Subsequent files can be copied to 
the output tape. However, the block count in the trailer label is then incorrect. 

DELSET (DELETE MEMBER) 

| DELSET deletes a member device from a device set. It cannot be executed while a device set is being shared. 
All member devices must be deleted before a DELSET is issued for the master device. The master device 
must be mounted before DELSET is issued. Permanent files, queue files, and local files residing on the device 
must be removed before DELSET is issued. If any portion of a local file or permanent file resides on the 
device to be deleted, the DELSET request is aborted. 

The format of DELSET is: 

| DELSET,SN=setname^lP=mpvsn,VSN=vsn. 

All parameters are required and are order independent. 

SN=setname Name of set from which member is to be deleted, 1-7 letters or digits beginning with 

a letter. 

I MP=mpvsn Volume serial number of master device for the device set, 1-6 letters or digits with 

leading zeros assumed. 
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VSN=vsn Volume serial number of member to be deleted from the device set, 1-6 letters or digits I 

with leading zeros assumed. 



DISPOSE (RELEASE FiLE) 

DISPOSE releases a file for end-of-job processing or specified disposition immediately or at the true end-of-job. 
DISPOSE can be used to: 

Assign a disposition code for an output file, including a forms code 
Send a file to a central site or remote site device 
Evict a file 

The file referenced with DISPOSE must reside on a public queue device or on ECS and must not be a perma- 
nent file. 

When a special-name file is to be evicted such that all file data and references are destroyed, the DISPOSE 
control statement should be used in preference to an UNLOAD or RETURN control statement. UNLOAD 
and RETURN cause the implicit disposition of the file to occur. Only DISPOSE or ROUTE can evict a file 
without causing special-name file output. 

The format of DISPOSE is: 
DISPOSER, 

The only required parameter is lfn. The asterisk is optional before the dc parameter. 

l fn Name of file to be disposed, 1-7 letters or digits beginning with a letter. If only lfn 

is specified, the file is evicted. 

* Defer disposition until end-of-job. Must be used if DISPOSE control statement appears 

before the file is created. In the absence of *, disposition occurs when the DISPOSE 
control statement is encountered in the job stream. The * cannot be used when disposing 
a file to an INTERCOM terminal or to a forms code. 

dc Disposition code. If dc is not specified, the file is evicted. 

PR Print on any available printer P8 Punch free-form binary format 

FRt Print on microfilm recorder 

LR Print on 580-12 printer PTt Plot on any available plotter 

LS Print on 580-16 printer HRt Print on hardcopy device 

LT Print on 580-20 printer HLt Plot on hardcopy device 

PB Punch standard binary format FLf Plot on microfilm recorder 

PU Punch Hollerith format 




t Supporting drivers must be supplied by the installation. 
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c 

Cff 
lid 



File is to be routed to the central site 

Code for special card or paper form ff. Codes are defined by the installation. 

File is to be routed to the INTERCOM terminal specified by id. 



Identification on the printout or punch output file is the name of the job that executed DISPOSE. 
DISPOSE EXAMPLES 



JOB. 

COBOL. 

LGO. 

DISPOSE,OUTPUT,PR. 

REWIND(LGO) 

FTN. 

LGO. 

7/8/9 

COBOL program 

7/8/9 

data for COBOL program 

7/8/9 

FORTRAN program 

7/8/9 

data for FORTRAN program 

6/7/8/9 



Prints OUTPUT on any available printer. 



Creates print file on OUTPUT. 



Creates unrelated print file on OUTPUT. 



This example creates two unrelated print files. The use of DISPOSE allows the files to be printed 
separately. The job dayfile is attached to the second OUTPUT file. 



JOB. 

DISPOSE,HERON,*PR=C. 

COBOL 

LGO. 

7/8/9 

COBOL program 

7/8/9 

data for COBOL program 

6/7/8/9 



File HERON to be printed at central site at end of job. 



Creates file HERON and file OUTPUT. 



This job creates a file named HERON and prints it at central site. If this job is submitted from 
an INTERCOM terminal, the OUTPUT file and the dayfile are returned to that terminal. 
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DMP (DUMP CENTRAL MEMORY) 

DMP prints the contents of selected areas of central memory. Three types of dumps are possible, depending on I 

4-ltA ra\**+ixra vrnliiAr f\£ +V»ia niromatorc rvri -fViA T^\4P /v\ti+iv\1 of a fortiori t 
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Exchange package dump Parameters omitted or all parameters specified are 0. 

Control point area dump Parameters are equal in value and not 0. 

Relative dump Parameters specify address within field length. . 

DMP output appears on the file OUTPUT. Each output line contains the contents, in octal, of up to four 
central memory words, with the address of the first word at the beginning of the line. 

When the content of a word is identical to the last word printed, printing of that word is suppressed. Printing 
resumes with the next word having a different content. The address of the word at which printing resumes is 
printed and marked by a right arrow. 

When the content of a word is the address of that word, printing is suppressed. Printing resumes with the next 
word that does not have its address as its content. The address of the word at which printing resumes is 
printed and marked by a greater-than sign. 

EXCHANGE PACKAGE DUMP 

The format of DMP that produces an exchange package dump is: 

DMP,0,0. or DMP. 

Either or both of the parameters can be omitted. 
Output from the dump includes: 

The contents of the exchange jump package as noted below. 

The contents of the communication area of the job field length, addresses RA through RA+100. 

The contents of the first 100 octal words before and after the address to which the P register points, 
provided the addresses are within the field length. If the P register is 0, the P address in bits 30-47 of 
RA+0 determines the locations to be dumped. If the P register or the P address in RA+0 is less than 
200 (octal), the first address dumped is 100. If both the P register and the P address are 0, only the 
communications area and the exchange package are dumped. 

The 16-word exchange package includes the following information. 

P Program register contents 

RA Central memory address of beginning of user field length 

FL Central memory address of field length limit 
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EM Error mode register divided by 100 (octal) 

RE ECS reference address divided by 1000 (octal) 

FE ECS field length divided by 1000 (octal) 

MA Monitor address applicable only to machines with monitor exchange jump instructions 

A0-A7 Contents of A registers 0-7 

B1-B7 Contents of B registers 1-7 (B0 is always zero) 

X0-X7 Contents of X registers 0-7 

When the exchange jump package is dumped, the following information is also given if addresses are within the 
field length. A message **OUT OF RANGE** appears if they are outside the field length. 

C(A1)-C(A7) Contents of addresses listed in registers A1-A7 

C(B1>C(B7) Contents of addresses listed in registers B1-B7 

CONTROL POINT AREA DUMP 

The format of DMP that produces a control point area dump is: 

DMP,x,x. 

x Any octal value except can be specified. 

This control statement dumps the entire (200 octal word) control point area. 

RELATIVE DUMP 

The format of DMP that produces a relative dump of locations with the job field length is: 

DMP,from,thru. 

When only one parameter appears, it is presumed to be the thru parameter and dump begins at RA. 

from Address at which dump is to begin after RA, octal. 

thru Address at which dump is to end, octal. If address exceeds FL, FL is substituted. 

DMPECS (DUMP EXTENDED CORE STORAGE) 

DMPECS prints the contents of selected areas of extended core storage. The file on which information 
appears and the format of the dump are both selected by control statement parameters. Only the field 
length assigned to the job can be dumped. All addresses are between RE and FE, the reference address and 
field length of assigned ECS. 
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The format of DMPECS is: 

DMPECS,from,thru,format,lfn. 

Parameters are positional; from and thru are required. 

from Address (octal) at which dump is to begin after RE. 

thru Address (octal) at which dump is to end. If address exceeds FE, FE is substituted. 

format Format of each output line: 

or 1 4 words in octal and in display code; default 

2 2 words in 5 octal digit groups and in display code 

3 2 words in 4 octal digit groups and in display code 

4 2 words in octal and in display code 

lf n Name of file on which printout is to appear, 1-7 letters or digits beginning with a 

letter. If omitted or 0, OUTPUT is assumed. 

The dump begins at the closest multiple of 10 (octal) less than or equal to the value of the from parameter. 
The dump ends at the closest multiple of 10 (octal) greater than the value of the thru parameter minus 1. 

DSMOUNT (DISASSOCIATE DEVICE) 

DSMOUNT disassociates a private device from the job. DSMOUNT is a logical operation. When DSMOUNT 
specifies the master device of a private device set, the entire set is disassociated from the job. A CLOSE/ 
UNLOAD function is issued for each open file on the set before each mounted member device is dismounted. 
Finally, the master device is logically dismounted from the job. 

The format of DSMOUNT is: 

DSMOUNT,VSN=vsn,SN=setname. 

Both parameters are required and order independent. 

VSN=vsn Volume serial number of device to be dismounted, 1-6 letters or digits with leading 

zeros assumed. Can be a member device or a master device. 

SN=setname Name of device set to which this device belongs, 1-7 letters or digits beginning with 

a letter. 
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DUMPF (DUMP PERMANENT FILE TO TAPE) 

DUMPF dumps permanent files to a tape. It can be used to clear permanent files from a mass storage device 
or to maintain back-up copies of files selected by parameters on the DUMPF control statement. Parameters 
on the DUMPF can identify a single file by name or specify the criteria by which the permanent file system 
selects files for dumping. 

The dump tape must be S tape format with the logical file name DUMTAPE. A REQUEST statement must 
appear in the job before DUMPF is called. 

Three dumps are possible: 

Mode 1 Back-up dump. The original copy of the file remains on mass storage ready for 

immediate access by an executing job. 

Mode 2 Archive dump. The file remains a permanent file, but with archive status. The only 

copy of the file resides on the dump tape; it can be accessed by an executing job if 
the operator makes the archive tape available so that the file can be reloaded to mass 
storage. 

Mode 3 Destructive dump. The file is no longer a permanent file. The only copy of the file 

resides on the dump tape. It cannot be accessed unless the LOADPF utility is executed 
to restore the file to permanent file status. 

DUMPF execution causes an implicit attach of a file having the permanent file name DUM. The device set 
from which files are being dumped must contain a copy of DUM cataloged with an ID of PUBLIC and defined 
passwords for RD, MD, CN, and EX. If a DUM permanent file with TK=DUMPF already exists (earlier systems 
required this), it must be purged and replaced as described above. Passwords to access DUM must be submitted 
as part of the DUMPF call. 

For each cycle dumped, DUMPF makes an output listing entry that contains the permanent file name, owner 
ID, cycle number, volume serial number of the dump tape, date of dump, a comment, and the flagging of any 
parity errors. 

The format of DUMPF is: 

DUMPF,PW=pw,M(>n,I=lfn 1 ,IP=lfn 2 ,CL4)P=a4D=name^F==pfn,CY=cy,SN=setname,VSN=vsn,IN=ddd, 
JN=yyddd,LA=nimddyyJ)A=yyddd,CD=mmddyy,TI=hhrnm. 

Only PW is required; all other parameters are optional and order independent. Only one CD, DA, JN, 
LA, or IN parameter can appear. If a terminator does not appear at the end of the parameter list, 
column 1 of the next card or line is considered to be a continuation of the DUMPF parameter list. 

PW=pw RD, MD, or CN password for DUM, depending on mode of dump. See CATALOG 

control statement for password definitions. 
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MO=n 



Dump mode: 



Mode 



I=lfn, 



LF=lfn- 



CL 



1 Back-up mode. Permanent file tables and all associated mass storage 
space are intact. RD password required. Default. 

2 Archive dump. Mass storage space is released, but permanent file tables 

«n«vknjv. rrrifi. 4-liA Hlan mnvlraa nm hainn *-»« ««^ o*>/>Hl«rck tona Ml t tviemmrfl 

required. 

3 Destructive dump. All permanent file tables and mass storage spaces are 
released as the files are dumped. CN password required. The central 
site operator receives notification when a mode 3 dump is attempted 
and must authorize continuance of the dump. 

Logical file name of directive file for M0=1 dump; 1-7 letters or digits beginning with 
a letter. All other parameters except MO, SN, CL, and PW are ignored. If Ifn. is 
not specified, directives for M0=1 are on INPUT. 

Output listing file. Default is OUTPUT. 

Complete list option selected. All files in the permanent file directory are listed. If 
CL is omitted, information is listed only for files which are dumped. 



DP=a 



Dump type: 
a 
A 
X 



Type 

All files meeting criteria of other parameters. Default. 

All files meeting criteria of other parameters only if their expiration 
dates are equal or less than current date. 

All files meeting criteria of other parameters only if they have been 
modified, renamed, created, or extended since the last DP=C dump. 



ID=name 
PF=pfn 

CY=cy 

SN=setname 
VSN=vsn 

IN=ddd 



Dump files with this owner. 

Dump files with this permanent file name. ID should be specified also; if it is not J 
specified, ID=PUBLIC is assumed. • 

Dump cycle cy of file identified by PF and ID. CY is ignored and the dump continues 
if this cycle is not found or if PF and ID have not also been specified. 



Dump files from device set with this name; 1-7 letts 



re r\r Himt 



s beginning with a letter. 



Dump files from this device of device set specified by SN; 1-6 letters or digits with 
leading zeros assumed. VSN is ignored if SN is omitted. 

Dump files inactive this number of days; 1-3 digits. Can be qualified by a TI 
parameter. 
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JN=yyddd Dump files inactive since this ordinal date; 5-digit ordinal date format. Can be 

qualified by TI parameter. 

LA=mmddyy Dump files not attached on or after this date; 6-digit month-day -year format. Can 

be qualified by TI parameter. 

DA=yyddd Dump files created, modified, renamed, or extended after this date; 5-digit year-and- 

day-of-year format. Can be qualified by TI parameter. 

CD=mmddyy Dump files created^ modified, renamed, or extended after this date; 6-digit month- 

day-year format. Can be qualified by TI parameter. 

TI=hhmm Time qualifier for date parameters; 4-digit 24-hour clock format. If date parameters 

are not specified, TI is ignored. 

Several copies of DUMPF can execute at the same time on the same set as long as all copies running have 
identical parameters. If an attempt is made to run a DUMPF with different parameters than one already 
running, all except the first DUMPF aborts. 

If a group of files is to be dumped for back-up purposes, they can be identified by name and owner in a 
directive record. The I parameter is required to specify the name of the file containing directives. Directive 
formats are as follows. 

ID=name 

ID=name, PF=pfn 
ID=name, PF=pfn, CY=cy 

Parameters are order independent and ending punctuation is not required. The PF and CY parameters are 
optional. The ID parameter should be specified. However, if the PF parameter is specified without an ID 
parameter, ID=PUBLIC is assumed. 

DUMPF EXAMPLES 

1. DAYDMP, . . . 
REQUEST(DUMTAPE,NT,PE,S,N) 
DUMPF(PW=PERM1 J)A=78164) 

6/7/8/9 

The job DAYDMP dumps all files cataloged, modified, renamed, or extended after the 164th day 
in 1978. 

2. SELDMP, . . . 
REQUESTPUMPTAPE,MT,HY,S,N) 
DUMPF(PW=PERM1) 

7/8/9 

ID=DEVCTR 

PF=FILE1 .ITMJER 

PF=FICHE,ID*GFS,CY=1 

6/7/8/9 
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Job SELDMP dumps the files specified in the input section of the control statement record. All 
files with ID DEVCTR are dumped. 

3. ARCHIVE, . . . 

PAUSE. BRING UF P DISPLAY TO INSURE DUMP TAPE HAS A VSN. 

REQUEST(DUMTAPE,MT,HY ) S,N) 

DUMPF(MO=2,IN=l 0,PW=PERM2) 



Job ARCHIVE illustrates a 10-day archive dump. 

EDITLIB (CONSTRUCT USER LIBRARY) 

EDITLIB constructs user libraries from a group of central processor routines or overlays. That library is avail- 
able to the system loader by specific direction in the loader control statements for a job. It can also create 
and maintain system libraries and create deadstart tapes. With EDITLIB a user library can be modified by 
the addition, deletion, replacement of routines, and statistics about library contents can be listed. 

A user library can only contain assembled central processor routines, CCL procedures, programs, or text records 
produced by the COMPASS assembler, one of the system compilers, or loader generated overlays. Library 
records can be independent programs, subroutines, overlays, or CCL procedures. Binary output from SEGLOAD 
cannot be made part of a library. Unassembled text records in BCD format, peripheral processor programs, 
and source language programs cannot be made part of user libraries. 

EDITLIB considers each program on a user library to be a single unit occupying a system-logical-record. It 
extracts the name, entry points, and external references from tables output with the program assembly and 
uses them to construct tables describing the library file. Library tables are used by the loader to locate pro- 
grams on the file. EDITLIB changes the tables when the user library is modified. Format of user library 
tables is the same as that for system libraries. A user library file created by EDITLIB contains: 

Assembled programs 

CCL procedures 

Tables referring to: 

Entry points 
External references 
Program numbers 
Program names 

The program number table is used to link external references, entry points, and program names. 

A user library can contain at most 2047 programs, 2047 external references, and 2047 entry points. A partic- 
ular program in the library can have at most 124 entry points and 124 external references. 

The user library file generated by EDITLIB can be on mass storage or magnetic tape. If the library file name 
is assigned to a tape file before EDITLIB is called, the library is in sequential format on that tape, with the 
library tables preceding the programs. Otherwise, the library is in random format on mass storage. When the 
random library file is to be retained as a permanent file, the library file name should be associated with a 
permanent file device before EDITLIB is called. 
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If a user library is to be copied from mass storage to tape, the EDITLIB directive RANTOSEQ should be 
used rather than a COPY utility. Likewise, SEQTORAN should be used to copy a library from tape to disk. 
The COPY utilities cannot copy a library file to or from mass storage correctly. 

The user is responsible for cataloging and attaching any permanent files that are used by EDITLIB while per- 
forming the task specified on each directive, and for extending permanent files that have been changed. 

EDITLIB CONTROL STATEMENT FORMAT 

The EDITLIB utility is called by an EDITLIB statement in the control statement section. If encountered 
during job processing, EDITLIB accesses the next unprocessed section of the INPUT file, unless the I parameter 
names another source of directives. A parameter on this statement specifies the file that contains EDITLIB 
directives. These directives provide details for creating or manipulating the user library. 

The format of EDITLIB is: 

EDITUBCUSERJ^nj ,L=lfn 2 ) 

All parameters are optional. 

USER Distinguishes user library definition from system library. Default is USER. 

lfn. Logical file name containing directives, 1-7 letters or digits beginning with a letter. 

Default is INPUT. I is identical to I=INPUT. 

lft^ Logical file name to receive listable output, 1-7 letters or digits beginning with a letter. 

Default is OUTPUT. L is identical to L=OUTPUT. 

The following deck structure assembles two programs and adds them to an existing library. 

job statement 

COMPASS. 

FTN. 

ATTACH(AUB,ID=SMITH) 

EDITL1B(USER) 

EXTEND(ALIB) 

7/8/9 

COMPASS program to be assembled 
7/8/9 

FORTRAN Extended program to be compiled 
7/8/9 

Directives instructing EDITLIB to add programs to user library ALIB from LGO file 
6/7/8/9 
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EDITLIB DIRECTIVE FORMAT 

The directive section for EDITLIB must contain only valid directives. EDITLIB considers the first 72 columns 
of each 80 column card or 90 column card image to contain a separate directive. Blanks can be used freely. 
EDITLIB removes them except in a literal or comment field. Required format for directives is similar to 
system control statement format. 

The format of EDITLIB directives is: 

keyword. or keyword(parameter list) 

Parentheses are required around parameter lists. Optional parameters have the format parameter=value; 
all others are required. Required parameters must appear in the order given; optional parameters can 
appear in any order after the required parameters. 

Directive format and use is summarized below: 
UBRARYCibname,! ^ ! ) 

FINISH. 

ENDRUN. 

ADDCprog,from,AL=level,FL=fl,FLO=0,UB) 

REPLACE(prog,from,AL=level,FL=fl,FLO=0,LIB) 

DELETE(prog) 

SETAL(prog4evei) 

SETFL(prog,fl) 

SETFLO(prog,jJ)) 

IISTLIB(prog4fn) 

REWIND(lfn) 

CONTENT(prog4fn) 

SKIPF(j n |,lfn) 
I prog | 



Defines library to be created or modified 
Terminates library manipulation 
Stops execution of directives 
Adds new program to library 
Replaces program on library 
Deletes program in library 



manges access isvei 



SKIPF(n4fn,F) 

SKIPB(! n ),lfn) 
I Prog | 

SKIPB(n ) lfn ) F) 



Changes field length requirements 

Sets FL override bit for INTERCOM 

Lists program data from library file 

Rewinds file 

Lists program data from file 

Skips ahead n records or to prog 

Skips n files forward 

Skips back n records or to prog start 

Skip n files backward 
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*/ Inserts comments in output 

RANTOSEQ(rlfn ) slfn) Rewrites random library as sequential library 

SEQTORAN(slfn/lfn) Rewrites sequential library as random library 

The prog parameter in these directives can take several forms: 

A single program name can be stated. EDITLIB searches the entire file specified to find the named 
program. 

An asterisk can replace the program name. EDITLIB processes all programs from the current file position 
to end-of-file. 

A range of programs to be included in directive execution can be specified with a + between the first and 
last programs to be processed. In a file with records A,B,C,D,E, the range B+D represents B,CJ). 

A single program to be excluded from directive execution can be specified with a dash (-) preceding the 
program name or with the program name appearing at both ends of the range of programs to be excluded. 

A range of programs to be excluded from directive execution can be specified with a — between the first 
and last programs to be considered. In a file with records A,B,C,D,E, the range B-D represents A and E. 

An asterisk can replace either the first or last program named in a range. For the first named program, 
it is equated with the current file position; for the last, it is equivalent to end-of-partition. 

For the ADD and REPLACE directives only, several individual programs can be stated. In a file with 
records A,B,C,D,E, the parameter D/B/E represent D and B and E. EDITLIB searches the entire file 
specified to find the named program. 

Program names must not exceed 7 characters. Any character supported by the system is legal. If characters 
EDITLIB uses for delimiters are in a name, the entire name must be written as a literal between dollar signs. 
These characters are: 

$()- + =.,/ blank 

Any dollar sign to be included in the program name must be prefixed by a second dollar sign. 

If the prog parameter is a single program name, EDITLIB searches the entire file for that program. If the prog 
parameter is a range, EDITLIB searches the entire file for the first program in the range, but does not search 
end-around for the second program. Thus, a range goes from the first program through either the second pro- 
gram or end-of-partition whichever occurs first. The file INPUT is not searched. 

The interpretation of the * depends on file format. The current position of a library file is always defined to 
be the beginning of the file. Current position of other files is simply the beginning of the next record on the 
file, which can be controlled by the user with file manipulation directives. An * replacing the last program is 
equivalent to stating end-of-partition. 
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Examples of names acceptable to EDITLIB: 

Parameter Format Resulting Program Name 



PR0G12 


PR0G12 




PR0G12S 


$1-0$ 


1-0 


AABB 


AABB 


$AABB$ 


AA BB 


3AB 


3AB 



library file names should not begin with ZZZZZ since these are reserved for system names. 

MANIPULATION OF LIBRARY FILES 

A library is created by identifying the library in a LIBRARY directive followed by file manipulation statements 
and ending with the FINISH directive. Multiple LIBRARY/FINISH sequences are permitted within an 
EDITLIB directive set. An ENDRUN should follow the last FINISH in the EDITLIB directive set. If 
ENDRUN is not supplied by the user, EDITLIB inserts it. 

Existing user libraries in random file format are modified by the ADD, REPLACE, and DELETE directives 
that change programs in the library. The SETAL, SETFL, and SETFLO directives change parameters in the 
program name table of entries for existing libraries. These directives must be issued between the LIBRARY 
(lfn.OLD) and FINISH directives. 

The format of library files can be changed by the RANTOSEQ function and the SEQTORAN function. 

File positioning statements can appear anywhere in the directive record. EDITLIB rewinds all files except 
INPUT before executing any directives. After a random library is written, it is rewound. When a new sequen- 
tial library is written, it is left-positioned after the end-of-partition. 

A list of information about any or all programs on a library file or a file of assembled information is obtained 
by the LISTLIB and CONTENT directives. Information listed comes from the program tables output with 
every assembled record. It includes: 

Program name 

Date, time, and compilation or assembly machine 

Entry points 

External references 

AL and FL values 
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Length of object deck in central memory words 
Type of program: relocatable or absolute 

ADD (ADD PROGRAM DURING LIBRARY CREATION) 

ADD directives between LIBRARY(lfn,NEW) and FINISH directives create a user library. Programs (other than 
peripheral processor programs) can be added from any file attached to the job, as long as the program contains 
the necessary prefix table material at the beginning of the assembled information. If the directive is in error, 
a message is issued, the programs are not added, and processing continues. 

The format of the ADD directive is: 

ADD(prog4fn,AL=level,FL=fl,FLO= j JJ ,LIB) 

Parameters prog and lfn are required; all others are optional. 

prog Name of program or range of programs to be added. 

lfn Logical file name where assembled program currently resides, 1-7 letters or digits 

beginning with a letter. 

AL=level Access level of 1-4 (octal) digits used to determine whether or not a given INTERCOM 

user can attach and use the program named. Also used to mark programs for access 
by control statements; level must be an odd number. Program is available only to 
internal calls unless AL is odd. Default is 0. 

FL=fl Maximum field length (0 to 377777 (octal)) required for program loading and 

execution. If FL=0, the field length specified on the job statement or the last RFL 
statement encountered is used. Default is 0. 



H?) 



Field length override bit. If FLO=l, then the field length from the job control state- 
ment CM parameter or from the RFL control statement or from the EFL INTERCOM 
command overrides FL. If FLO=0, no override is allowed. Default is 0. 



LIB Indicates the parameter lfn is a user library name. Allows programs to be added 

from an existing user library. It directs EDITLIB to search the directory of a file 
in library format. 

If AL, FL, or FLO values are wanted in the new library tables, they must be explicitly stated in the directive, 
even if the addition is to be made from an existing library. To change the values of these parameters in an 
existing library, use the SETAL, SETFL, and SETFLO directives. 
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Examples of valid ADD formats and their results: 
Parameter Format 
ADD(*,TREES) 



Result 



ADD(RAINIER,MTS,FL=1 4400) 



All programs between current position and the end-of-partition of 
TREES are added. 

All of file MTS is searched for program RAINIER; field length 
of 14400 (octal) is required to execute RAINIER. 



ADDfREDWOOD-SEQUOIAJIMBER) All programs on file TIMBER, except REDWOOD, SEQUOIA, 

and all those between, are added. 



ADD(*+ASPEN,YELLOW) 

ADD(BIG/SHARP,LEAF) 

ADD(ALP,LIBR,LIB) 



All programs from the current position of YELLOW through 
program ASPEN are added. 

File LEAF is searched as needed, and programs BIG and 
SHARP are added. 

The program name table of library LIBR is searched for pro- 
gram ALP which, when located, is added to the current 
library. 



CONTENT (LIST FILE) 

CONTENT lists any file of assembled programs, whether in library format or not. 

The format of the CONTENT directive is: 

CONTENT(prog4fn) 

prog Program or range of programs to be listed. 

Kh Logical file name containing prog, 1-7 letters or digits beginning with a letter. 

DELETE (DELETE PROGRAM FROM LIBRARY) 

DELETE logically deletes all references to the named program from library tables. 
The format of the DELETE directive is: 

DELETE(prog) 

prog Name of program or range of programs to be deleted. 
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Examples of valid DELETE formats and their results: 

Parameter Format Result 

DELETE(BIRCH+ASH) Programs BIRCH through ASH on library being modified are 

deleted. 

DELETE(LAUREL-MADRONE) All programs on existing library except LAUREL, MADRONE, 

and those between, are deleted. 

Programs named in a DELETE or REPLACE directive are logically deleted from the library file. Records in 
the file are not overwritten; but in the case of a REPLACE, the file is extended with the addition of a new 
program. To completely eliminate programs from the library, it is necessary to construct a new library using 
the old one as the source. 

ENDRUN (STOP EXECUTION) 

During directive processing, EDITLIB first interprets each directive in the record excluding comment statements. 
Execution begins after all directives are interpreted. 

When an ENDRUN is encountered during execution phase, execution stops. In most instances, ENDRUN is 
the last directive in the record. By placing it earlier in the record, syntax of succeeding directives can be 
checked without an error producing premature termination. 

The format of the ENDRUN directive is: 

ENDRUN. 



FINISH (STOP FILE MANIPULATION) 
FINISH indicates the end of library construction. 
The format of the FINISH directive is: 
FINISH. 

LIBRARY (IDENTIFY LIBRARY) 

LIBRARY identifies the library to be manipulated. This directive must precede all other directives except 
comments or file manipulation directives. Every directive set calling for library creation or modification must 
have at least one such directive. A FINISH directive is required to mark the end of library construction. File 
manipulation statements can appear between LIBRARY and FINISH. 



The format of the LIBRARY directive is: 
| OLD 1 



LIBRARYOibname,!^)) 
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libname library name and name of file containing library during this job, 

OLD Used when libname is an existing library to be modified. 

NEW Used when libname refers to new library or directory to be created. 

LISTLIB (LIST LIBRARY FILE) 

IISTLIB lists a library file. Part or all of the library can be listed depending on the number of programs 
indicated by the prog parameter. The LISTLIB directive cannot appear between a LIBRARY and a FINISH. 

The format of the LISTLIB directive is: 

USTUB(prog4fn) 

prog Program or range of programs to be listed. 

Ifn Logical file name containing prog, 1-7 letters or digits beginning with a letter. 

RANTOSEQ (CONVERT RANDOM FILE TO SEQUENTIAL FILE) 

RANTOSEQ takes a disk resident library file in random format and creates a sequential library file containing 
the same programs. This directive cannot appear between a LIBRARY and FINISH. 

The format of the RANTOSEQ directive is: 

RANTOSEQ(rlfn,slfn) 

rlfn Disk resident random library that is to be converted. 

slfn Sequential library created from rlfn. 

REPLACE (DELETE AND REPLACE PROGRAM) 

REPLACE differs from the ADD directive in that it causes a program with an identical name to be deleted 
from the library before the new program is added. If a program with that name does not exist, an informa- 
tive message is issued and the new program is added to the library. 

The format of the REPLACE directive is: 

REPLACE(prog4fn,AL=level,FL=fl ) FLO=0,LIB) I 

Parameters have the same meaning as those of the ADD directive. AL, FL, and FLO values must be stated 
explicitly if values other than the defaults are wanted. Current values in source library or existing library 
tables are not preserved when ADD or REPLACE is used. See ADD for parameter definitions. 



60493800 E 44 5 



Examples of valid REPLACE formats and their results: 

Parameter Format Result 

REPLACE(MAPLE,TREES ) FLO=0) Existing program MAPLE is deleted. Program MAPLE is added 

from file TREES. FLO is set to 1; FL and AL are set to 
default values. 

REPLACE(OAK,TREES) Existing program OAK is deleted and replaced; FL, FLO, and 

AL receive default values. 

REPLACE(ACORN,TREE,LIB) Program name table for library TREE is searched for program 

ACORN. The named program is deleted from the current 
library and the new program ACORN is added from library 
TREE. 

REWIND (REWIND FILE) 

The format of the REWIND directive is: 

REWINDOfn) or REWIND(lfn/lfn/ . . . lfn) 

lfn Logical file name of file or files to be rewound. 

SEQTORAN (CONVERT SEQUENTIAL FILE TO RANDOM FILE) 

SEQTORAN takes a tape resident library file in sequential format and creates a disk resident library file con- 
taining the same programs. The directive cannot appear between a LIBRARY and a FINISH. 

The format of the SEQTORAN directive is: 

SEQTORAN(slfn,rlfn) 

slfn Tape file in sequential format that is to be converted. 

rlfn Random library file created from slfn. 

SETAL (CHANGE ACCESS LEVEL) 

SETAL assigns a new access level to the named program. 

The format of the SETAL directive is: 

SETAL(prog4evel) 

prog Name of program or range of programs. 

level New access level of 1-4 (octal) digits. 
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SETFL (CHANGE FIELD LENGTH) 

SETFL assigns a new field length to the named program. 
The format of the SETFL directive is: 



Ml Mill IT /^^a-- Jl\ 

5H i r l4pt Gg,ilj 



prog Name of program or range of programs, 

fl New field length of to 377777 (octal). 

SETFLO <SET FIELD LENGTH OVERRIDE BIT) 

SETFLO sets the field length override bit for INTERCOM. 
The format of the SETFLO directive is: 

SETFLO(prog,|°j) 

p ro g Name of program or range of programs. 

Does not allow override; is the default value. 

1 Allows override. 

SKIPB (SKIP BACKWARD) 

SKIPB repositions a library backward one or more records or mcs. im- uuiaiy u> !«»»««. a* „„, .^e^— - B 
of a record or file. When beginning-of-information or end-of-information is encountered, a skip by count is 
terminated. For a skip by name, the entire file is searched, if necessary, in the direction stated. Skip by 
program name is applicable to sequential files only. 

The format of the SKIPB directive for records is: 

SHPB( P 4fn) 

n Number (decimal) of records to be skipped backward; cannot be zero. 

prog Program name to which instruction skips. 

lf n Logical file name containing prog, 1-7 letters or digits beginning with a letter. 
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The format of the SKIPB directive for files is: 
SKIPB(n4fn,F) 

n Number (decimal) of files to be skipped backward; cannot be zero, 

lfn Logical file name of multi-file, 1-7 letters or digits beginning with a letter. 

F Indicates files, not records, are to be skipped. 

SKIPF (SKIP FORWARD) 

SKIPF repositions a library forward one or more records or files. The library is positioned at the beginning of 
a record or file. When beginning-of-information or end-of-information is encountered, a skip by count is 
terminated. For a skip by name, the entire file is searched, if necessary, in the direction stated. Skip by pro- 
gram name is applicable to sequential files only. 

The format of the SKIPF directive for records is: 

SKIPF( |progr fn) 

n Number (decimal) of records to be skipped forward; cannot be zero. 

prog Program name to which instruction skips. 

lfn Logical file name containing prog, 1-7 letters or digits beginning with a letter. 

The format of the SKIPF directive for files is: 

SKIPF(n4fn,F) 

n Number (decimal) of files to be skipped forward; cannot be zero. 

lfn Logical file name of multi-file, 1-7 letters or digits beginning with a letter. 

F Indicates files, not records, are to be skipped. 
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USER EDITLIB EXAMPLES 



1. MTCREAT. 

REQUEST(MTLIB,LO,VSN=i4444) 
REQUEST(SOURCEFL,MT ) VSN=14445) 



Requests 7-track tape to noid new durary. 
Requests tape with previously assembled source 
programs. 



EDITIiB(USER) 

7/8/9 



FORTRAN Extended program to be compiled, program name HOOD. 



7/8/9 

LIBRARY(MTIIB,NEW) 
REWIND(SORCEFL) 
REWIND(LGO) 

ADD(*+SHASTA,SORCEFL) 

SKJPF(3,SORCEFL) 

ADD(HOOD,LGO) 

ADD(*,SORCEFL) 

FINISH. 

ENDRUN. 

6/7/8/9 



Initiates construction of new library MTLIB. 

Rewinds binary input file. 

Rewind binary output from FORTRAN 

Extended program. 

Adds programs from beginning of file 

through SHASTA. 

Skips 3 programs on file. 

Adds program from LGO file. 

Adds all remaining programs on SORCEFL. 

Terminates library construction. 

Stops execution. 



Job MTCREAT creates a sequential user library on a tape. 

2. MTCHNGE. 

REQUEST(MTLIB,LO,VSN=l 4444) 
REQUEST(DIRECT,MT,VSN=1 2000) 
EDITUB(I=DIRECT) 

6/7/8/9 

Job MTCHNGE modifies the library created above. Directives for EDITLIB are on tape 12000. 



BIRDS. 

REQUEST(BIRDLIB,*PF) 

ATTACH(GULLS,GULLSPF,ID=PETERSON) 

ATTACH(WRENS,WRENSPF,ID=PETERSON) 

EDITLIB(USER) 

CATALOG(BIRDLIB,BIRDLIBRARY,ID=PETERSON) 

7/8/9 

LIBRARY(BIRDLIB,NEW) 

ADD(*,GULLS) 

ADD(CACTUS-HOUSE,WRENS) 

FINISH. 
ENDRUN. 

6/7/8/9 



Job statement. 

Requests permanent file device for library. 

Attaches permanent file as lfn GULLS. 

Attaches permanent file as lfn WRENS. 

Calls EDITLIB. 

Catalogs library as permanent file. 

Establishes library name. 

Adds all files from GULLS. 

Adds all files from WRENS except CACTUS 

through HOUSE. 

Terminates library. 

Stops execution. 
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Job BIRDS creates a random format library file and makes it permanent. Binary input files exist on 
permanent files GULLSPF and WRENSPF. 

4. CHECK. 

EDITLIB(USER) 

7/8/9 

ENDRUN. Stops execution here. 

LIBRARY(OLDLIB,OLD) 

DELETE(SPARROW) 

REPLACE<HAWK,INPUT,FIjO=0) 

SETAL(SHRIKE,777) 

SETFLO(ROBIN,l) 

SETFL(CREEPER^5000) 



FINISH. 

6/7/8/9 

Job CHECK uses EDITJJB to check syntax of all directives but does not execute. 

EXECUTE (INITIATE EXECUTION) 

EXECUTE causes execution of a loaded program. It is a loader control statement. See the CDC CYBER 
Loader Reference Manual for additional information. EXECUTE terminates a load sequence. 

The format of EXECUTE is: 

EXECUTE. 

EXECUTE normally follows a LOAD control statement. 

EXIT (PROCESS AFTER FATAL ERROR) 

The EXIT control statement establishes the conditional processing of sequences of control statements when 
certain fatal errors occur. If an error causes a job step to terminate (table 4-1), the system aborts the job and 
searches the job control statement file for EXIT control statements, skipping other control statements in the 
process. If the system finds no EXIT statement, the job is terminated as described in Job Processing and 
Deck Structure, section 2. 

The formats of the EXIT statement are: 

EXIT. 

liXIT.C. 

EXIT.U. 

EXIT.S. 
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C Conditional processing option. 

U Unconditional processing option. 

S System processing option. 

bypass EXIT processing and terminate the job immediately. Error conditions are classified as follows: 

Job step abort Terminates the current job step and starts the search for any of the four types of 

EXIT control statements. Most error conditions in the system are in this classification. 

Special abort Terminates the current job step processing and starts the search for an EXIT,S 

control statement. 

Terminal abort Terminates the current job step and the job immediately. No EXIT processing takes 
place. 

Table 4-3 describes the type of EXIT processing performed when various errors occur. 



EXTEND (PERMANENT FILE EXTENSION) 

EXTEND makes information written at the end of an existing permanent file permanent. Information can be 
written at the end of any attached permanent file. However, in the absence of an EXTEND or ALTER con- 
trol statement, the acded information disappears when the job terminates. EXTEND can be issued with the 
file at any position. 

EXTEND can be issued by any job that attaches the file with extend permission or by the job that catalogs the 
file. The newly added information acquires the privacy controls of the existing permanent file. No boundary 
exists between the original information and the new information. 

The format of EXTEND is: 

EXTEND,lfn. 

lfn Logical file name of permanent file attached with extend permission, 1-7 letters or 

digits beginning with a letter. 
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GENLDPF (RELOAD PERMANENT FILE CATALOG) 



GENLDPF reads a log tape created by the PFLOG utility and generates LOADPF jobs, which will load the 
files that had a permanent file catalog (PFC) entry at the time PFLOG was run. mis auows tue instauatioi 
to do a full reload of the permanent file base without reloading files purged since the last full dump. 



n <* nn»n T-.-TM-I • ^.11 _ i TkT^y^TTTTClT 1 J. 1 ~4-~4~.~.<«.«4 «-..m + Anfivta n \rxrt fila net o*> avit^intt IqKaIa/1 QT 

ijel^rS LrniNi-.l^iT' IS CSiieQ a JSX. 1 'UH-i^i iAJAIliUI *l£LGiiiGiii iiiu&l ucim& a lug ixiv ao sni vAiaiutg iduvivu -*t 

tape whose logical file name is LOGTAPE. 

For each entry read from the log tape, GENLDPF makes an output listing entry that contains the permanent 
file name, owner id, and cycle number. 

The format of GENLDPF is: 

GENLDPF,PW=pw,SN=setname,VSN^sn,LF=lfn. 

PW is required; all other parameters are optional. However, SN is specified if VSN is specified, and 
vice versa. All parameters are order independent. 

PW=pw EX password required for generated LOADPF jobs. 

SN=setname Name of device set onto which permanent files are to be reloaded, 1-7 letters or digits 

beginning with a letter. The master device for this set must have been mounted 
before GENLDPF can execute. Default is the permanent file default set. 

VSN=vsn Volume serial number of the master device of the device set specified by SN=setname. 

LF=lfn Name of file on which the listing is to appear, 1-7 letters or digits beginning with a 

letter. Default is OUTPUT. If lfn=0, no listing is generated. 
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GENLDPF EXAMPLES 

1. JOBX(NT01) 
VSN(L0GTAPE=1 23456) 
REQUEST(LOGTAPE,NT,PE,E,NORING) 
GENLDPF(FW=HELLO) 

6/7/8/9 

This job reloads files onto the permanent file default set and writes the output listing on OUTPUT. 

2. JOBY(NT01) 
VSN(LOGTAPE=246801) 
MOUNT(SN=SETNAME,VSN=MASTER) 
REQUEST(LOGTAPE^T,PE,E,NORING) 
GENLDPF(PW=LOAD,SN=SETNAME,VSN=MASTER,LF=0) 

This job reloads files onto set SETNAME whose master pack vsn is MASTER. No output listing is 
generated. 

GETPF {ATTACH PERMA8E&8T FSLE FROM LINKED MAINFRAME) 

GETPF attaches a permanent file to a job, as long as parameters specified on the GETPF control statement 
establish the right to use the file. GETPF differs from the ATTACH control statement in that: 

GETPF creates a local copy of a file; ATTACH manipulates the file itself. 

GETPF can obtain a copy of any permanent file residing in a permanent file default set. ATTACH can 
access only permanent files which reside on a device directly connected to the mainframe on which the 
job is executing. 

The format of GETPF is: 

GETPF,lfn,pfn,ID=name,EC=ec,(££"" J ,MR=m,PW=pw,RW^p,ST=mmf. 

The first parameter establishes the logical file name. Parameters lfn and pfn are required in the order 
shown; all other parameters are order independent. ID and ST are required. GETPF can be continued; 
if a period or right parenthesis does not appear at the end of the parameter list, column 1 of the next 
statement is considered a continuation of column 80. 

lfn Logical file name, 1-7 letters or digits beginning with a letter. If omitted, the first 

seven characters of pfn establish lfn. 

pfn Permanent file name by which the file is known in the permanent file catalog, 1-40 

letters or digits. Required. 

ID=name ED parameter by which the file was cataloged. Required unless the file was cataloged 

with ID=PUBLIC. 

ST=mmf System on which file is cataloged, 3 characters. 
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See the ATTACH control statement for the remaining parameters. 
GETPF always sets MR=1. 

The file referenced by a GETPF must reside on the permanent file default set of the mainframe specified. A 
copy of the file is transmitted to the mainframe on which the job is executing at the time the file is opened. 

Any modifications made to the file during the job are a part of the local file copy, not of the original 
permanent file. 

LABEL (TAPE LABEL SPECIFICATION) 

LABEL writes or checks VOL1 and HDR1 labels on tapes. In addition to substituting for a REQUEST control 
statement for a single file labeled tape, LABEL can be used to position within a multi-file set. 

In most instances, LABEL is the first reference to a file in a job, unless it is preceded by a VSN statement 
indicating the volume serial number of the resident volume. For a single file volume, a REQUEST is not 
needed, although a REQUEST followed by LABEL is valid and does not create an error condition. If a 
REQUEST statement follows the LABEL statement, duplicate file names are generated and the job terminates 
since the LABEL program issues a REQUEST function to obtain the equipment. For labeled multi-file volumes, 
a REQUEST establishing the multi-file set must precede the LABEL statements that write the header labels for 
various files in the set. 

The label program issues an OPEN function to read or write the file label. Contents of the label are copied to 
both the system and job dayfiles. When label fields are not consistent with the information supplied on the 
LABEL control statement, the operator is notified. The operator can mount another tape and have its label 
checked or can authorize the job to continue with the existing tape. 

The format of LABEL is: 

LABEL,lm,(^},(y),j^ NG },{^ 

The first parameter must be the logical file name. An R or W parameter is required. The remaining 
optional parameters are order independent. LABEL can be continued; if a terminator does not appear 
on the first statement, the next is assumed to be a continuation of the first. 

Default parameters cause a single file header in ANSI format for a 7-track tape in SI format. Any other 
label or data format to be written, or a tape to be read, must be declared explicitly. 

9-track tape can be selected only by giving either a 9-track density parameter (HD, PE, or GE) or a code 
conversion parameter (US or EB). 

Read or write: 

R Label is to be read and compared with parameters on the LABEL control statement. 

When R is issued, the tape can be a candidate for auto-assignment by label name. 

W Label is to be written. 
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Label type: 

Y 3000 series label. 

Z Label conforms to standard label of previous operating system. Character 12 of the 

VOL1 label specifies data density; otherwise Z labels are identical to U labels. 

absent Standard label conforming to ANSI. 

Write ring: 

RING Write-enabled ring required in tape. 

NORING Write-enabled ring prohibited in tape. 

absent Parameter is set to installation-defined value. 

Hardware error correction: 

EEC Enable hardware GE write error correction. The system allows certain types of 

single-track errors to be written that can be corrected when the tape is read (on-the- 
fly correction). This is the recommended mode of operation, because it provides 
efficient throughput, error recovery, and tape usage when writing GE tapes on media 
that is suitable for use at 3200 fci or 6250 cpi. 

IEC Disable all error correction activity in GE write mode. The system invokes standard 

error recovery processing when an on-the-fly error occurs while writing a GE tape. 
The system erases the defective portion of tape, thereby reducing the amount of 
data that can be stored on the tape. Only tape that is suitable for recording at 6250 
cpi should be used when this mode of operation is in effect. 

NOTE 

EEC and IEC apply only to GE (6250 cpi) operations. GE 
must also be specified in a REQUEST statement; otherwise, 
EEC and IEC are ignored. 

EEC and IEC are applicable if the user requests default 9-track 
density and the installation 9-track default density is GE 
(6250 cpi). 

Tape characteristics: 

D=d Density. If omitted, density declared or implied by REQUEST prevails. For 7-track 

tapes: 



LOt 


200 bpi 


HI 


556 bpi 


HY 


800 bpi 



t200 bpi can be read but not written by 667/677 tape drives. 
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For 9-track tapes, the d parameter determines density for writing only; data is 
always reading at the recording density. 

HD 800 cpi 

PE 1600 cpi, phase encoded 

GEt 6250 cpi, group encoded 
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S S tape format 

L,tt L tape format 

N=n Code for conversion of 9-track tapes only. Default is installation defined. 

US ASCII code 

EB EBCDIC code 

X=x Disposition of tape: 

IU Inhibit physical unload 

SV Unload tape at end of job; notify operator to save 

CK Checkpoint dump written on tape 

CI Checkpoint dump and inhibit physical unload 

CS Checkpoint dump and save 

Label fields: 

L=z Label name, 1-17 characters for ANSI or Z labels; 1-14 characters for Y labels. 

Default value is spaces. 

V=v Label field. Volume number specifying volume sequence in volume set. 1-4 digits 

for ANSI or Z labels; 1-2 digits for Y labels. Default is 0001 for ANSI or Z 
labels, 01 for Y labels. 

E=e Label field. Edition number specifying version of file. 1-2 digits. Default is 00. 

T=t Label field. Number of days file is to be retained, 1-3 digits. Default determined 

by installation. 999 is permanent retention. A retention period greater than 364 
days results in the assignment of T=999. 

C=c Label field. Creation date, in format of 2 digits for year, 3 digits for day. Default 

is current date. 

M=m Label field. The operating system uses this parameter to establish that the current 

LABEL function applies to a member of a multi-file set. m is the logical multi- 
file set name as it appears on the REQUEST statement for this set, and it must 
be present for all LABEL statements referencing members of this multi-file set. 
When the label is written on tape, the multi-file field does not contain the logical 
set name. It contains the VSN for the first volume of the multi-file set. 



t6250 cpi density is supported only on 679 GCR tape drives. 
ttL format is supported only on 7-track drives and 669/679 9-track tape drives. 
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P=p Label field. Position number indicating file within multi-file set, 14 digits. Default 

is 0001. Not defined for 3000 series labels. 

VSN=vsn Volume serial number of 1-6 characters used to identify the tape for automatic 

assignment. Parameter can appear on VSN statement rather than LABEL state- 
ment. A VSN of SCRATCH or specifies a scratch tape. 

LABELMS (DEVICE SET LABELING) 

LABELMS labels a device before it is used in a device set, places the volume serial number in the label, and 
establishes the type of access to the device. In addition, LABELMS can be used optionally to inhibit pre- 
allocation of space for customer engineering diagnostics, to specify information for subsequent access to the 
device, and to record known flaws on a device so that such areas are not accessed. 

The format of LABELMS is: 

| LABELMSJDT=dt^node,I=lfn. 

All parameters are optional. 

| DT=dt Device type. If DT is omitted, the operator can assign any device type. The value 

of dt is a device mnemonic; for example, AY for 844-21. (See section 6 for list 
of device types.) Member devices subsequently added by the ADDSET statement 
must have the same device type as the master device. 

mode Recording mode for an 844 disk pack. Default is defined at installation time. 

HT Half tracking 

FT Full tracking 

I=lfn Logical file name for input directives containing allocation and flaw information. 

If I is specified but not equivalenced, file INPUT is used; otherwise, no directives 
are expected. Consequently, default allocation information is used and the disk is 
presumed to be free of flaws. If this parameter is specified, DT must also be 
specified. 

Input directive formats are as follows: 

All values in the directives are assumed to be octal unless suffixed with a D. 

Each directive must begin in column 1 and end with a valid terminator. Valid control separators must 
appear between the elements of a directive. Successive allocation directives must refer to successive 
portions of a device. Allocation directives can be intermixed with flaw directives. A maximum of 
eight allocation directives is permitted. 

Allocation directives- Aas,Rpru,Nrbs. 

Flaw directives: 



{Ttn,Ccn,Ssn. 
Ttn,Ccn,Sfsn-lsn. 
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as 



pru 



Allocation style with limits of to 77 (octal); defauit is as=0. The user can request 
a specific allocation feature, such as directing a file to a specific portion of a device 
having a particular record block size and/or recording technique. 

Number of PRUs per record block (RB size) must be greater than or equal to 1/32 , 
of the PB (physical block) size and less than or equal to 32 times the PB size. I 



rbs 



Number of record blocks in the RBR for this device or n ortion of device. The RBR, 
maintained by the operating system in central memory, contains information indicating 
its allocation style and the status (available for assignment) of all record blocks 
governed by this RBR. The limits of rbs are 1 to 7777 (octal). Default depends on 
the device as shown below. 



tn 


Track number ' 






en 


Cylinder number 


Limits 


depend on device as shown below 


sn 


Sector number 






fsn 


First sector number 


Indicates several contiguous flaw sectors 


Isn 


Last sector number . 






Device 


PB Size 
(PRUs) 


RB Size 

Default 

(PRUs) rbs Default 


tn Limits en Limits sn Limit 


844-21 
844-41 


160t 
160 


70 6240 
70ft 6240t 


to 22 to 632 to 27 
to 22 to 1466 to 27 



All values listed above are octal. 



NOTE 



User packs cannot have the number of RBs greater than the installation- 
defined maximum number of record blocks to be used for private devices. 
All members of a user device set must have identical allocation directives 
specified when the devices are labeled. 



tlhis value changed from 70 to 160 with the introduction of the 844-41 devices. Only devices with the 
following RB sizes are compatible on both pre- and post-844-41 supporting systems. 

For devices with (RB size)< 70B, RB sizes of 2, 4, 7, 10, 16, 34, 70 are 
compatible with both systems. 

For devices with (RB size) >70B, RB sizes such that (2n-l)*70+l < RB size 
< 2n*70, where n=l,2...20B, are compatible with both systems. 

t1"To create an 844-41 (double-density) pack with an RB size of 70B, two allocation directives must be input 
to LABELMS. The 844-41 's require two RBRs when the RB size is 70B. 
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For 844-21 (AY) and 844-41 (AZ), the flaws recorded on the device in the utility flaw map (UFM) are read 
by LABELMS (except during deadstart) and added to the flaws supplied in the input file. If the pack does 
not contain the flaw map, the following informative message is written to the job dayfile. 

ERROR IN READING UFM 

During deadstart. LABELMS obtains a complete set of flaws from IRCP through CMR including the flaws 
from the utility flaw map read by IRCP. 

LIMIT (LIMIT MASS STORAGE) 

LIMIT limits the amount of rotating mass storage that is assigned to a job. Normally, a job is assigned as 
much mass storage as it needs. However, a user might want to limit the maximum mass storage that should 
be assigned, for example, during a debug phase when large amounts of output would indicate program errors. 
Any time mass storage in excess of the specified limit is required, the job terminates. 

The format of LIMIT is: 

LIMIT,n. 

n Number (octal) indicating the maximum number of blocks that can be allocated to 

the job. Blocks are 4096 60-bit words. The n parameter is required. 

The value of the LIMIT parameter should anticipate both the number and size of files that exist at one time. 
The information in the mass storage accounting message in the dayfile might be helpful in determining a 
limit for the LIMIT control statement. Note that the dayfile message is in decimal words, but the LIMIT 
argument is in blocks of 4096 words. The mass storage statistic is issued only if a LIMIT control statement 
has been executed by the job or if the installation has set a non-zero default mass storage limit. Generally, 
very small limits should be avoided, since the system allocation of one record block, at minimum, for each 
file can exceed the limit established even though each file is small. 

Record blocks are defined at each installation, usually with different sizes of blocks for different mass storage 
devices. For example, a disk might have record blocks of 3200 words. In this instance, a statement specifying 
LIMIT(2) would cause job termination when a third file is opened, since 3 times the record block size is more 
than the stated limit of 8192 words. 

Mass storage occupied by the INPUT file or attached permanent files is not involved in the total mass storage 
allocation for LIMIT calculations. Any file evicted from mass storage decreases the count of words allocated. 

LISTMF (LIST LABELED TAPE) 

LISTMF lists the KDR1 labels of files in a multi-file set. The utility is valid only for tape files with ANSI 
standard labels. All volumes in the set are processed with a single utility call. The listing appears on the file 
OUTPUT. 

A REQUEST control statement defining the multi-file set is required before LISTMF is called. 



4-60 60493800 E 



The format of LISTMF is: 

LISTMF,M=mfn,P=p. 

M=mfn Multi-file name of the set, as declared on the REQUEST control statement. Required. 

p=n Position of file at which listing is to begin; 1-3 digits. The first file in the set is 

position 1. Default is 1. 

The multi-file set is rewound at the beginning of LISTMF execution, then positioned to the beginning of the 
file indicated by the P parameter. listing of header labels stops when the end of the set (EOF label followed 
by multiple tape marks) is reached. No further positioning occurs. 

LOAD (LOAD PROGRAM) 

LOAD loads a file into memory in anticipation of a call for execution of loaded programs. LOAD can initiate 
a load sequence or be part of an existing load sequence but it does not terminate a load sequence. An 
EXECUTE control statement, or, in the case of overlay preparation, a NOGO control statement, would normally 
terminate the load sequence. 

LOAD is defined by the loader, not the operating system. See the CDC CYBER Loader Reference Manual 
for further details. 

The format of LOAD is: 

LOADJfn 1 /r4fn 2 /r 

More than one parameter can be specified when all files contain relocatable programs. Only one parameter 
can be specified when the file contains an absolute program. 

lf n . Logical file name of file containing binary executable code, 1-7 letters or digits 

beginning with a letter. 

r Rewind indicator: 

R Rewind file prior to loading. Rewind of the file INPUT rewinds to the 

beginning of the control statements; no skipping of control statements 
occurs. 

NR Inhibits rewind prior to loading. 

Loading from the file terminates when a partition boundary, or end-of-information is encountered, or when two 
consecutive 7/8/9 cards are encountered in an image of a job deck. 

LOADPF (LOAD PERMANENT FILE FROM TAPE) 

LOADPF loads permanent files that have been dumped to tape. All files or a selected portion of files on the 
tape can be loaded. An optional directive file specifies individual files to be loaded. Multiple copies of 
LOADPF can execute at the same time. A job can access a file as soon as it is entered into the permanent 
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file tables. For each cycle loaded, LOADPF makes an output listing entry that contains the permanent file 
name, owner ID, cycle number, date of last dump, and a comment. 

Before LOADPF is called, a REQUEST or LABEL control statement must define a tape file named DUMTAPE 
in S format with an existing label. If the dump tape for a file to be loaded contains more than one file with 
the same permanent file name, cycle number, and ID name, a message is sent to the operator and the file is 
ignored. New cycles of a permanent file will not be loaded if the passwords of the tape cycle disagree with 
the existing cycle. 

LOADPF execution causes an implicit attach of a file whose permanent file name is DUM. The device set to 
which files are to be loaded must contain a copy of DUM cataloged with an ED of PUBLIC and defined 
passwords for RD, MD, CN, and EX. If a DUM permanent file with TK=DUMPF already exists (earlier systems 
required this), it must be purged and replaced as described above. The EX password to access DUM must be 
submitted as part of the LOADPF call. 

NOTE 

Files purged between a full DUMPF and several change dumps (DUMPF,DP=C) are 
reloaded when both the change and full dumps are reloaded. However, running 
PFLOG after each change dump and then running GENLDPF with the last log tape 
restores the PFC without reloading the purged files. For multi-volume LOADPF 
jobs, NORING must be specified on a REQUEST or LABEL control statement. 

The format of LOADPF is: 

LOADPF,IP^,LF=lfn p CL,SN=setaame,VSN=^,^^ 
LA=romddyy,DA=^ddd,CD=mmddyy,TI=hhmm. 

Only PW is required. All parameters are order independent. Only one LP parameter can be specified. If a 
terminator does not appear at the end of the parameter list, column 1 of the next card or line is considered 
to be a continuation of the LOADPF parameter list. 

LP=x Files to be loaded: 



x Significance 

A Load all files. Existing files are not replaced unless the file is 

incomplete or not disk resident. Default. 

R Replace existing files. Both X and R can be specified in the 

form LP=X,R. 

P Load archived files (files with entries in permanent file tables 

but file residence on tape). 

X Do not load expired files. 

Permanent file dump tape is in SCOPE 3.2 or 33 format. If 

LP=0 is not specified, the tape is assumed to be a SCOPE 3.4 
permanent file dump tape. The option can be used with 
other LP parameters in the form LP=R,0,X. 
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LF=lfn 



1 



CL 



VSN=vsn 

ID=name 

PF^pfn 

CY=cy 

I=lfn 2 

PW=pw 

IN=ddd 
JN=yyddd 

LA=mmddyy 

DA=yyddd 

CD=mmddyy 

TI=hhmm 



Name of file on which listing is to appear, 1-7 letters or digits beginning with a 
letter. Default is OUTPUT. 

Complete list option selected. All files on the dump tape are listed. If CL is 
omitted, only loaded files are listed. 

INSmS Ot tiSVlCC SCi li- ' WIIii- : ii iiiCS slIC iUiiUGU- 1~> iCLLClN Ui UI^iLb ijckyiuiiiiti wiui a 

letter. Master device of this set must be previously mounted. 

Volume serial number of the device onto which permanent files are loaded, 1-6 
letters or digits with leading zeros assumed. Parameter SN must also be included, 
and the master device of the set must be previously mounted. 

Load files with this owner. 

Load files with this permanent file name. ID=owner is also required. 

Load cycle cy of file specified by PF and ID. CY is ignored and the load continued 
if this cycle is not found, or if PF and ID are not specified. 

Logical file name of directive file, 1-7 letters or digits beginning with a letter. If I is 
specified but not equivalenced, file INPUT is used. 

EX password for DUM. 

Load files inactive this number of days; 1-3 digits. Can be qualified by a TI parameter. 

Load files inactive since this ordinal date; 5-digit ordinal date format. Can be qualified 
by TI parameter. 

Load files not attached on or after this date; 6-digit month-day-year format. Can be 
qualified by TI parameter. 

Load files created, modified, renamed, or extended after this date; 5-digit year-and-day- 
of-year format. Can be qualified by TI parameter. 

Load files created, modified, renamed, or extended after this date; 6-digit month-day- 
year format. Can be qualified by TI parameter. 

Time qualifier for date parameters; 4-digit 24 hour clock format. If date parameters 
are not specified, TI is ignored. 



A group of files to be loaded can be identified by name and owner in a directive record. When input directives 
are selected, only parameters SN and CL are valid on the LOADPF call. Directive formats are as follows: 

ID=name 

ID=name, PF=pfn 
ID=name, PF=pfn, CY=cy 
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Parameters are order independent. The PF and CY parameters are optional. The ID parameter should 
be specified. However, if the PF parameter is specified without an ID parameter, then ID=PUBLIC is 
assumed. 



LOADPF EXAMPLES 

1. JOB1. 
REQUEST(DUMTAPE,HY,S,E) 

I LOADPF(PW=EXPW) 

6/7/8/9 

This job loads all files on the tape unless LOADPF finds the owner ID, permanent file name, and cycle 
number combination already in the system; such files are skipped. 

2. JOB2. 

REQUEST(DUMTAPE,HY,S3) 
| LOADPF(IP=jgPW=EXPW) 

6/7/8/9 

This job loads all non-expired permanent files from tape. 

3. JOB3. 
REQUEST(DUMTAPE,HY,S,E) 

| LOADPF(PF=STARTREK,ID=SPOCKJPW=EXPW) 

6/7/8/9 

All cycles of the permanent file STARTREK with owner ED SPOCK are loaded unless one of the 
following conditions arises. 

The permanent file name/owner ID combination already exists in the system with different 
passwords. 

A duplicate cycle number is encountered. 

The permanent file name/owner ID combination already has five cycles cataloged. 

4. JOB4. 
REQUEST(DUMTAPE,...) 

I LOADPF(I,PW=EXPW) 

7/8/9 

PF=PASSERIFORMES,CY=21 JD=VEERY 
PF=ANATINAE,ID=GADWELL 
PF=PROCELLARIIFORMESJD=FULMAR 
6/7/8/9 

This job loads the specified permanent files from tape. 
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MAP (PRODUCE LOAD MAP) 

MAP determines the extent of the load map produced for all subsequent programs loaded in central memory. 

TT11C11 lTi..ni Id VJllilLLVU, oil Liiaiuuaiivii uviuuii uvtviitiutvo uiv (.jr^v v. nm^s • 

Output from a load map appears on the file OUTPUT. It includes items such as the type of load, location of 
^rosrarns common blocks and tables and entn 7 n oints. Load ma n s of n ro ar ams on the s v stem librar v such 
as compilers or assemblers, are never produced. See the CDC CYBER Loader Reference Manual for an expla- 
nation of all items in the load map. 

The MAP option selected remains in effect until another MAP control statement changes the option or the 
job ends. 

The format of MAP is: 



MAP,< 



fOFF 
FULL 
ON 
iPARTl 



OFF No map is produced. 

FULL Full map is produced. 

ON Map has all items except entry point map. 

PART Map has all items except entry point map and cross-reference. 

The effect of a MAP can be overridden for a particular load sequence by the MAP option of the loader state- 
ment LDSET (see the CDC CYBER Loader Reference Manual). 

MODE (SUSPEND ERROR EXIT) 

MODE specifies the error conditions that abnormally terminate the job. Normally, a job terminates when any 
of the following CPU program errors are detected. 

Reference to an operand (any number used in a calculation) that has an infinite value. 

Reference to an address outside the field length of the job in central memory or ECS; such an address 
can be generated during assembly if a non-existent location is referenced or inadequate field length is set. 

Reference to an operand for floating point arithmetic which has an indefinite value. 

When a selected error condition is detected, the job terminates. When an error condition not selected by 
MODE is detected, job processing continues and no error message is issued* A MODE selection remains in I 
effect until another MODE control statement is executed or the job ends. 



'On a CDC CYBER 176, address range errors always result in job termination, no matter what option is 
specified on the MODE statement. 
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The format of MODE is: 
MODE,m. 
m CPU program error exit conditions 0-7 (octal). If omitted, 7 is assumed. 

Disable CPU program error exit; all errors allow job to continue. 

1 Address is out of range. 

2 Operand is infinite. 

3 Both 1 and 2 remain in effect. 

4 Floating point number of indefinite value. 

5 Both 1 and 4 remain in effect. 

6 Both 2 and 4 remain in effect. 

7 1 and 2 and 4 remain in effect. 

For example, a MODE, 5. statement directs the system to continue processing even if an infinite operand is 
encountered. If an address is out of range or a floating point number of indefinite value is encountered, the 
job terminates. A control statement MODE,7. is equivalent to a job without a MODE control statement. 

MOUNT (ASSOCIATE DEVICE SET) 

MOUNT associates a device set and its members with a job. MOUNT is a logical operation. If the device is 
physically available, no operator intervention is required. If the device is not physically available, the device 
name is placed in an operator display, and the job is swapped out until the device is mounted. 

When the master device is mounted, the device set tables are read into the system and all files and member 
devices become logically accessible to the job. The master device must remain mounted while the associated 
device set is in use. When the master is mounted, the system issues a MOUNT for other member devices as 
needed. The user also can issue a MOUNT for a member device. 

The format of MOUNT is: 

MOUNT,VSN=vsn,SN=setname,mode. 

Parameters VSN and SN are required; mode is optional. All parameters are order independent. 

VSN=vsn Volume serial number of device to be mounted, 1-6 letters or digits with leading 

zeros assumed. 

SN=setname Name of device set to which this device belongs, 1-7 letters or digits beginning with a 

letter. 
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mo de Recording mode for an 844 disk pack. Default is defined at installation time. 

HT Half tracking 
FT Full tracking 

PAUSE (OPERATOR INTERFACE) 

PAUSE inserts a formal comment into the job dayfile and stops the job until the operator acknowledges the 
comment. PAUSE should not be used unless communication with the operator is essential. The COMMENT 
control statement allows messages to be inserted into the dayfile without the need for operator response. 

The format of PAUSE is: 

PAUSE, comment 

The period is required. The comment can begin in any column after the period; ending punctuation is | 
not required. 

comment String of 74 characters to be displayed for the operator. Any character can be 

specified, including those otherwise used as punctuation. Characters with display 
code values greater than 57 are displayed as blanks. 

All eighty characters (PAUSE plus message) are displayed for the operator. A message longer than 74 charac- 
ters can be sent by using a second PAUSE control statement, but each statement requires operator action. 

The operator acknowledges the PAUSE message by a GO, DROP, or KILL command that continues, drops, 
or aborts the job, respectively. 

PFLOG {DUMP PERMANENT FILE CATALOG TO TAPE) 

PFLOG dumps the permanent file catalog (PFC) of a device set to a magnetic tape 0og file). 

Before PFLOG is called, a REQUEST control statement must define the log file as a new labeled SI tape 
whose logical file name is LOGTAPE. 

PFLOG execution causes an implicit attach of a file whose permanent file name is DUM. The device set 
whose PFC is to be dumped must contain a copy of DUM cataloged with an ID of PUBLIC and a defined 
password for RD. The RD password must be submitted as the PW parameter on the PFLOG call. 

For each PFC entry dumped, PFLOG makes an output listing entry that contains the permanent file name, 
owner id, and cycle number. 

The format of PFLOG is: 

PFLOG ,PW=rd,SN=setname,LF=lfn. 

Only PW is required. All parameters are order independent. 
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PW=rd RD password for DUM. 

SN=setname Name of device set whose PFC is to be dumped; 1-7 letters or digits beginning with 

a letter. The master device for this set must have been mounted before PFLOG can 
execute. Default is the permanent file default set. 

LF=lfn Name of file on which listing is to appear; 1-7 letters or digits beginning with a letter. 

Default is OUTPUT. If lfn=0, no listing is generated. 

PFLOG EXAMPLES 

1. JOBCARD(NT01) 
VSN(LOGTAPE=123456) 
REQUEST(IXXJTAPE,NT,PE,N,RING) 
PFLOG(PW=READ,LF=0) 

6/7/8/9 

This job dumps the permanent file default set to LOGTAPE. No output listing is generated. 

2. JOBCARD(NT01) 
VSN(LOGTAPE=l 23456) 
MOUNT(SN=SETNAME,VSN=MASTER) 
REQUEST(LOGTAPE,NT,PE,N,RING) 
PFLOG(SN=SETNAME,PW=READ) 
6/7/8/9 

This job dumps the PFC of SETNAME to LOGTAPE and prints the output listing on OUTPUT. 

PURGE (REMOVE PERMANENT FILE) 

PURGE removes the permanent status of a file. The file remains as a local file for the job if the file is being 
accessed on the mainframe at which the job is executing, if the file is not archived, and if the RB parameter 
is not specified. Control permission is required to purge a file. 

PURGE affects only one cycle of a permanent file. If a cycle number is not specified, the cycle with the 
highest cycle number is purged. If there is only one cycle, the permanent file name is removed from the 
permanent file tables. A subsequent CATALOG with the same permanent file name and ED would be an 
initial CATALOG. 

The format of the control statement and subsequent file permissions depends on whether the file is already 
attached to the job. If the full format is specified when the file is attached, all parameters except lfn and RB 
are ignored. 

If the file is attached to the job, the format of PURGE is: 

PURGE4fn,RB=l. 
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If the file is not attached to the job, the format of PURGE is: 

PURGEJfn,pfn,ID=name,j^r" j,EC=ec ) MR=mJ>W=pw,UV==uv ) RB=l,RW=p,SN=setname,ST=rnrnf. | 

Only Ifn is required as long as the file is attached to the job. Parameters other than lfn and pfn are 
order independent. PURGE can be continued; if the parameter list is not terminated by a period or 
right parenthesis, column 1 of the next statement is considered to be a continuation of column 80. 

lf n Logical file name by which file is attached to the job, 1-7 letters or digits beginning 

with a letter. 

RB=1 Record block conflict. Applicable only when the record block conflict flag is set in 

system tables to indicate that storage allocation for the file is in conflict with mass 
storage allocation elsewhere. If this parameter is used when the conflict flag is set, 
the local file has all permissions removed except control permission and the mass 
storage associated with the file is not released when the file is released to the system. 
The AUDIT utility reveals the presence of files with storage conflict. 

ST=mmf System on which file is cataloged, 3 characters. If the file is not cataloged on the 

mainframe at which the job is executing, a job is generated on the specific mainframe 
to purge the file. If this parameter is specified, any SN parameter is ignored. 

See the ATTACH control statement for the meaning of remaining parameters. 

RECOVER (DEVICE SET MAINTENANCE) 

RECOVER validates a device set and reconstructs tables whenever the integrity of a device set is in question. 
It scans critical disk tables of a device set to verify and recreate each. Any errors encountered during the 
recovery process are noted in the OUTPUT file. The RECOVER control statement is not executed if this 
iob or anv other iob has issued instructions to mount the device set. 

The format of RECOVER is: 

RECOVER,SN=setname,VSN=vsn. 

Parameters are required and order independent. 

SN=setname Name of device set to be validated or reconstructed, 1-7 letters or digits beginning 

with a letter. 

VSN=vsn Volume serial number of device set master device, 1-6 letters or digits with leading 

zeros assumed. 

In a multi-mainframe environment permanent files on the device set could be destroyed if RECOVER is 
executed when one of the mainframes has the master mounted. Therefore, the system aborts the request 
unless called from the console by an operator entry. 
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REDUCE (REDUCE FIELD LENGTH) 

REDUCE decreases the central memory field length assigned to a job to the amount of memory needed by 
the program currently loaded. It also restores dynamic field length management by the operating system that 
the job previously inhibited through execution of an RFL control statement or through use of a CM param- 
eter on the job statement. REDUCE should be used whenever the job no longer requires special field length 
handling. 

The format of REDUCE is: 

REDUCE. 

RENAME (CHANGE PERMANENT FILE TABLE) 

RENAME changes values of parameters in the permanent file manager tables. Parameter values originating 
from a prior RENAME or original file catalog can be deleted or changed to different values and new param- 
eters can be added. RENAME affects only the parameters specified on the control statement; other parameters 
remain as they were. 

Prior to issuing RENAME, the job must attach the file with read, extend, modify, and control permission. 
The format of RENAME is: 

RENAME4fn,pfn,ir>=name,AC=act,CN==cn,CY^y,EX^x^D=md,RD=rdjaNrp,TK=tk^R=xr. 

Only the lfn parameter is required; it must be the first parameter. All other parameters are optional 
and order independent. RENAME can be continued; if the parameter list is not terminated by a period 
or right parenthesis, column 1 of the next statement is considered to be a continuation of column 80. 
Two commas can follow lfn when pfn is not changed. 

Specifying the parameter name and an equals sign without a following parameter value removes the 
existing value for that parameter. 

lfn Logical file name of attached permanent file, 1-7 letters or digits beginning with a 

letter. Required. 

RP Retention period, 0-999. Applies to date of original CATALOG, not to date of 

RENAME. 

See the CATALOG control statement for the meaning of remaining parameters. 

Any change to the permanent file name, ID, or passwords of any cycle of a file causes the same change to be 
made for all cycles of the file. Consequently, RENAME cannot change the permanent file name, ID, or pass- 
words if any cycle of the file has been dumped or archived to tape. If the pfn/ID are being changed and a 
file already exists with the proposed pfn/ID, the pfn/ID change will not occur, and a nonfatal error message 
is issued. 
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REQUEST {ASSIGN FILE TO DEVICE) 

REQUEST requests assignment of a file to a particular device. Since control statements are processed in order 
of appearance, the REQUEST statement for a particular file must precede the control statement that executes 
the program referencing that file. Otherwise, the file is sought or written on a public scratch device when it 
is referenced. 

REQUEST is most commonly used with permanent files, magnetic tapes, and private device sets, but it can be 
used to cause file assignment to any public device or unit record equipment. Files are assigned to public disk 
packs by a REQUEST or by system default. However, to ensure that a file is assigned to a permanent file 
device, a REQUEST statement with a *PF parameter should be used. 

When a REQUEST control statement is encountered, job processing might halt for operator action or continue 
with operating system action, depending on the form of the parameter specifying device type, and for magnetic 
tape, the installation tape assigning options. 

The general form of REQUEST is: 

REQUEST,lfn,dt,parameters. 

Parameter lfn is required and must be the first defined; all other parameters are optional and order 
independent. 

lf n Logical file name by which file will be known throughout the job, 1-7 letters or 

digits beginning with a letter, lfn beginning with ZZZZZ is reserved for the system. 
lfn cannot be OUTPUT. With private device sets, lfn also cannot be PUNCH, 
PUNCHB, P80C, FILMPR, FILMPL, PLOT, HARDPL, or HARDPR. 

dt Device type mnemonic plus other dt parameters to further describe equipment 

requested. If the user specifies an optional device type parameter which is unique to 
a device type (for example, the GE parameter for a 9-track tape), the device type 
mnemonic need not be specified. A preceding asterisk allows assignment of devices 
without operator action if possible. An asterisk is implied for mass storage devices. 

parameters Optional parameters. 

The optional device type descriptors depend on the category of equipment involved. Details of parameters for 
REQUEST are discussed separately in relation to files on the following devices. 

Magnetic tapes (7- and 9-track) including multi-file sets 

Unit record devices such as card reader and line printer 

ECS 

Public devices including those used for permanent files 

An asterisk preceding the device type mnemonic causes the operating system to attempt to assign the device 
without operator action. Automatic assignment is attempted on mass storage devices regardless of whether the 
asterisk is specified. The tape assigning options available make the * redundant for magnetic tape requests, 
but it can be used. However, * cannot be used if two units are requested with the same control statement 
or a multi-file set is involved. If * is used for unit record devices, the REQUEST control statement appears 
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on the operator display for manual assignment. The operator must then make the unit physically ready and 
logically assign it to the job by entering a command on the console keyboard. See Unit Record Device Request 
description which follows in this section. 

When sufficient information is given on the REQUEST control statement, the operating system assigns the 
device to the job without operator action. For rotating mass storage devices, automatic assignment is attempted 
whether or not the asterisk precedes the dt parameter. For other device requests, operator action is required 
if an asterisk does not precede the dt parameter. If dt is not declared, the operator can assign any device. 
For tape request, a VSN parameter is used to locate and to assign the tape if it is mounted. 

The operating system compares the device assigned by the operator with the request and reports any discrepancy 
to the operator. An additional operator command must be given if the dt parameter on the control statement 
is to be overridden by manual assignment. Conflicts must be resolved by the operator. 

TAPE FILE REQUEST 

The REQUEST control statement can describe both physical and logical characteristics for magnetic tape files. 
When only the logical file name and magnetic tape device type MT are specified, the file, by default, becomes 
a 7-track unlabeled tape with SI format written at installation density or read at written density, and installa- 
tion declarations for automatic unloading are honored. Any other use, such as for checkpoints or multi-file 
sets, or characteristics of the file must be specifically declared. 

The MT or NT device type parameter can be prefixed by an asterisk or a 2. The asterisk is applicable only 
when compatibility with previous operating systems is considered. The asterisk prefix results in assignment of 
a scratch tape to the file. However, if a non-scratch VSN has been specified also, it overrides the scratch 
designation. If REQUEST includes parameter E, a scratch tape is not assigned. Depending upon the selection 
of installation options, the operating system attempts to assign the tape to a job automatically using a VSN or 
label name parameter. Operator assignment is necessary only when automatic assignment attempts are unsuccessful. 

If either a 7- or 9-track tape is acceptable, an MN parameter can be used in place of MT or NT. The resulting 
tape has default density. However, to ensure that the job is not aborted because of maximum tape units 
exceeded, the job statement should specify both MT and NT. If the request includes at least one device type 
descriptor which is unique to magnetic tapes (such as the RING parameter), neither the device type nor the 
density need be specified. 

A 2 prefix to MT or NT causes two tape units to be requested from the operator, which are used in the order 
assigned. Tape requests using the 2 prefix cannot be auto-assigned. When the tape on the first unit reaches 
end-of-volume, the system begins processing the tape on the second unit while the tape on the first unit is 
rewound and unloaded. When the tape on the second unit reaches end-of-volume, the system returns to the 
first unit, which should have been mounted in the interim with a new tape. The tape on the second unit is 
rewound and unloaded. This alternating process is repeated as long as the file is referenced. The operator 
must ensure the proper tape mounting sequence. 

7-TRACK TAPE PARAMETERS: 
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Logical file name: 

If the MF parameter is not specified, lfn is the logical file name of 1-7 letters or digits beginning 
with a letter. 

If the MF parameter is specified, this parameter is a multi-file set name of 1-6 letters or digits 
beginning with a letter. 

The multi-file set name cannot be used in any input/output statement except as the M parameter in 
a LABEL statement or POSMF macro. 

7-track identification: 

A declaration of LO, HI, or HY is sufficient to define the device type as MT. If MT is absent, 
LO, HI or HY can be prefixed by a 2 if two units are required. 



Density: 
LOt 
HI 
HY 

absent 



200 bpi density 
556 bpi density 
800 bpi density 

Density is set to an installation defined value if initial use is output. If initial use of 
a label tape is input, the density of the label is determined automatically. However, 
it is recommended that density be specified whenever known and used to read both 
the label and the data, except as indicated under Z below. If initial use of an 
unlabeled tape is input, the density is set to an installation-declared value. 
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IU 



sv 

absent 
Tape security: 
RING 
NORING 
absent 



Any physical unload of the tape file in a context other than reel swapping is inhibited. 
The IU parameter does not inhibit logical actions associated with UNLOAD or RETURN. 
IU is recommended when a scratch tape or input tape is requested that is to remain 
mounted and ready. 

The tape file is unloaded at job termination, and the operator is notified that the tape 
is to be saved. 

Action performed at end-ofjob is option of the installation. 

Write-enable ring required in tape. 

Write-enable ring prohibited in tape. 

RING/NORING is set to an installation defined value. 



tlhe 667/677 tape units can read but not write at 200 bpi. 
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Volume serial number identification 
VSN=vsn 



absent 



Volume serial number of the tape volume, 1-6 letters or digits with leading zeros 
assumed. The VSN appears on the previewing display for the operator's information 
before the job is assigned to a control point. Once the tape is mounted and the unit 
made ready, the operating system can locate the volume without further operator 
action. Once the tape is assigned, the VSN is verified against the standard or Z for- 
mat label, if present. VSN also is verified against operator-supplied VSN for an 
unlabeled tape. 

If a scratch tape is desired, a VSN of SCRATCH or can be used. The * prefix can 
be used for a scratch tape also. 

If a VSN parameter is declared for a file on a REQUEST, and a VSN control state- 
ment or a VSN parameter on a LABEL control statement also appears, the first 
declaration is effective. 

Any VSN declaration is used; otherwise, file header label fields are used for assignment 
and verification. If neither VSN nor file header label field declaration is made, any 
tape volume is accepted, but the assignment must be made manually unless * prefix 
is used. 



Parity error recovery procedure: 
NR 



The NR parameter can be used to inhibit normal parity error recovery procedures. 
Data containing the parity error is returned to the user. 



Checkpoint dumps are written on the tape. 
The tape is a valid U or Z labeled multi-file set. 
Neither of the above is assumed. 



Special tape use: 

CK 

MF 

absent 
Data format: 

S Data format is S. 

L Data format is L. 

absent Data format is SI format. 

Input or output use (apply only to labeled tapes): 

E 



Existing label. Initial use of the tape is input; only the expiration date is checked in 
the label. 



N New label. Initial use of the tape is output; tape label is written, 

absent If file is to be labeled (U, Z or Y is declared), a tape label is written. 
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Label characteristics: 

U Tape label format is ANSI (standard label) 

Y Tape label format is Y (3000 series label). 

Z_ « «_ * ** , • i\tat j. _1 .a*"* i ^ «^ +!»*» \WVF 1 IoKaI ie no a/4 trt indicate 
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data density. These labels were standard for SCOPE 3.3. 

absent Tape is unlabeled unless either E or N is declared; in which case, ANSI (U) label 

format is assumed. 



Label processing: 



NS 



The NS parameter can be used to indicate a tape has non-standard labels and is to be 
processed as unlabeled even though the tape is labeled. Existing labels appear to the 
system as data and are passed to the user as such. The user can then process the 
labels or ignore them. Non-standard labels are not supported on SI tapes. 



9-TRACK TAPE PARAMETERS: 

A declaration of MT or a 9-track density for a tape to be written is required to identify a 9-track tape. 
Definitions and conditions for all except the density and data format parameters are the same as those for 
7-track tape. 



REQUEST,lfn,NT,|HD 
iGE 



^eillJ-iMcyci^-- 



Density: 



A density specification is effective only when the tape is to be written; density setting is a hardware 
function when the tape is read. 



PE 


1600 cpi 


HD 


800 cpi 


GE 


6250 cpi 


absent 


Tape written at installation-declared density 


Data format: 




S 


Data format is S. 
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Lf Data format is L. 

absent Data format is SI format. 

Hardware error correction: 

EEC Enable hardware GE write error correction. The system allows certain types of 

single-track errors to be written that can be corrected when the tape is read (on-the-fly 
correction). This is the recommended mode of operation, because it provides efficient 
throughput, error recovery, and tape usage when writing GE tapes on media that is 
suitable for use at 3200 fci or 6250 cpi. 

IEC Disable all error correction activity in GE write mode. The system invokes standard 

error recovery processing when an on-the-fly error occurs while writing a GE tape. 
The system erases the defective portion of tape, thereby reducing the amount of 
data that can be stored on the tape. Only tape that is suitable for recording at 
6250 cpi should be used when this mode of operation is in effect. 

NOTE 

EEC and IEC apply only to GE (6250 cpi) operations. GE must also be 
specified in a REQUEST statement; otherwise, EEC and IEC are ignored. 

EEC and IEC are applicable if the user requests default 9-track density 
and the installation 9-track default density is GE (6250 cpi). 

Coded data conversion codes for 9-track S or L tapes (see conversion tables in appendix A): 

US Coded label on data is to be converted from ASCII on input or to ASCII on output. 

EB Coded label on data is to be converted from EBCDIC on input or to EBCDIC on 

output. 

absent Coded data conversion is defined by the installation. 

Examples of REQUEST statements for tapes: 

1. REQUEST(FILEl^T,U,E^ORING) 
or 
REQUEST(FILE1 ,NT JE.NORING) 

The operator must assign an ANSI labeled, 9-track tape. The label is checked when the first 
function is issued on the tape. Because density is not specified, it is assumed that both the label 
and data are written at the same density. 



'Currently L tapes are supported only on 7-track tape devices and 669/679 9-track tape drives. 
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2. REQUEST(FILE,*MT,RING) 

Depending on installation option, the system automatically assigns FILE1 to a scratch tape on a 
7-track tape unit. The file is unlabeled and written in SI data format at an installation-declared 
density. 

3wEOTTFvl¥.vTAnfPv7 TTi VSkM = OFTTOi 7 US SV* I? 1K11 t a 

Depending on installation option, file STANF27 is assigned automatically to a unit containing volume 
OHI017. An ANSI label is written; both label and data are written at 556 bpi. Data format is S. 
The volume is saved at job completion. 

UNIT RECORD DEVICE REQUEST 

When a file is input from a card reader or output to a printer or card punch, devices are assigned automatically 
and REQUEST is not necessary. There are no standard drivers for the unit record equipment. Request and 
assignment of such devices is only valid for on-line diagnostic packages or for devices for which the installation 
has provided drivers. If the installation has provided drivers, the following devices can be requested. Assign- 
ment is not automatic; the operator must assign the request device to the job. 

REQUEST,lfn,dt. 

lfn Logical file name of 1-7 letters or digits beginning with a letter. 

dt Device type. The following device types are recognized, but not supported by the 

standard system. If an installation provides software drivers for these devices, they 
can be specified. 

LP Any available line printer GC 252-2 graphics console 

HC 253-2 hardcopy recorder 

LR 580-12 line printer p^ 254-2 microfilm recorder 

LS 580-16 line printer TR p aper tepe reader 

LT 580-20 line printer jp Paper tape punch 

CR 405 card reader p^ Plotter 

CP 415 card punch 

ECS FILE REQUEST 

Files that are to reside on ECS are requested by the following control statement. This statement is not to be 
used for files that are buffered through ECS. 

REQUEST4fn,AX,EC. 

lfn Logical file name of 1-7 letters or digits beginning with a letter. 

AX ECS device type mnemonic. Required. 

EC Maximum file size. If omitted, default buffer size is the maximum file size. 
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EC Default buffer size maximum. 

ECnnnn Maximum size mum words multiplied by 1000 (octal). 

or 

ECnnnnK 

ECrmnnP Maximum size nnnn ECS pages, where page size is 1000 (octal) 

60-bit words. 

If ECS is turned off, the files requested on ECS are allocated on rotating mass storage devices. 

MASS STORAGE FILE REQUEST 

Mass storage files on either public device sets or private device sets are requested as follows. The EC param- 
eter is valid only for files on public device sets. 

For private device sets, a MOUNT control statement must assign the master device to the job before REQUEST 
assigns a file to the device set. 

REQUEST;fn,dtaa,OV,EC,*FF,*Q,SN=setname,VSN=vsn. 

The first parameter must be lfn. Other parameters are optional and order independent. 

Ifn Logical file name of 1-7 letters or digits beginning with a letter. 

dtaa Device type mnemonic and allocation style. An asterisk can appear before dt, but its 

function is redundant. 

dt Device type mnemonic for a mass storage device: 

■ AY 844-21 disk drive 

AH 819 disk drive (CDC CYBER 170 Model 176 only) 

AZ 844-41 disk drive 

A* Any mass storage device 

aa Octal allocation style defined by the installation for public sets; by 

LABELMS for user device sets. Can be null. 

ov Overflow to any other mass storage device is allowed when device dtaa or a device 

I specified by SN and VSN parameters is unavailable or full. Permanent files and queue 

■ files are assigned only to permanent file devices and queue devices, respectively; other- 
wise, files might be assigned to any mass storage. If all mass storage of any type 
becomes unavailable, a device capacity exceeded status is returned to a COMPASS 

| program when the EP bit is set in the FET. When OV is specified and requested 

device is unavailable or full, all parameters are ignored except *PF, *Q, and SN as 
the system selects the device on which to continue. 
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EC 



*PF 



SN=setname 



VSJN=vsn 



Buffer file through ECS. Valid only for sequential files on public devices.t If ECS 
is off, this parameter is ignored for this job. 

The EC parameter can also be used on a CDC CYBER 170 Model 176 to request a 

ilf Tf th« nsAr 






iffsrip" data to the 819 di 



specifies AH (819 Disk Drive) without specifying the EC parameter, the default 
number of LCM buffers is assigned. 



EC 

ECnn 

ECnnnn 

or 

ECnnnnK 

ECnnnnP 



Default buffer size. 

Number of 512 1Q -word buffers (nn) to be assigned. 

Buffer size of nnnn 60-bit words multiplied by 1000 (octal). 



Buffer size of nnnn ECS pages, where page size is 1000 (octal) 
60-bit words. 



Assign file to a permanent file device. If SN and VSN specify a permanent file 
device, *PF is not required. If SN is not specified, the file is assigned to the default 
*PF set. 

File is to be assigned to a queue device. If SN is a private device set, *Q is not 
allowed. If SN is not specified, the file is assigned to the queue set. 

Assign file to setname, 1-7 letters or digits beginning with a letter. If omitted, file 
is assigned to a public device set. If only SN is specified, setname is that specified by 
SETNAME control statement; if setname has not been specified previously, file is 
assigned to a public device. 

Volume serial number of device within set specified by SN, 1-6 letters or uigits witu 
leading zeros assumed. VSN cannot be used without the SN parameter. 



Allocation style aa is an optional appendage to the device type mnemonic. Two digit octal codes representing 
allocation style must be defined at each installation and can be used to identify sub-areas of a device. For 
example, an installation can divide 844 disk packs into two sub-areas - default and large space allocation. If 
the large space allocation area is identified as allocation style aa=55, files residing in the large space allocation 
sub-area are assigned more units of disk storage than similar files residing in the default sub-area. At this 
example installation, a file is assigned large space allocation sub-area by REQUEST(lfn,AY55). 



RESTART (RESTART JOB FROM CHECKPOINT TAPE) 

RESTART restarts a job from a checkpoint tape. After locating the proper dump on the checkpoint tape, the 
restart program requests all tape files defined at checkpoint time and repositions these files. Then a request is 
made for all mass storage files and ECS buffer length where applicable. Files are copied from the checkpoint 
tape and repositioned. RESTART also restores the central memory field length of the job and restarts the 
user's program. If a permanent file was attached to the job when a checkpoint was called, it is attached and 
positioned as it was at the time of the checkpoint. 



tAll file types will be buffered for device type AH (CDC CYBER 170 Model 176 only). 
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A restart job requires only a control statement to request the checkpoint tape (REQUEST or LABEL) and the 
RESTART control statement. If a checkpoint tape is not requested, the restart program requests an unlabeled 
7-track or 9-track tape (for the file named on the RESTART control statement) as follows: 

REQUEST0fn,CIUrfN) 

Since RESTART recreates all files used for the checkpointed job, the user should not create any files before 
the call to RESTART. If any of those files are recreated by the user before the call to RESTART, a 
duplicate file error might occur. 

If a device set was mounted when the checkpoint was taken, the job issuing the RESTART must execute a 
MOUNT control statement for the device set before calling RESTART. RESTART does not mount device 
sets. Files on device sets are attached and positioned by RESTART. 

Any ECS direct access user area attached to the job is copied in its entirety to the checkpoint tape. At 
restart time, it is recopied to ECS from the checkpoint file. On the job statement for the restart job, the user 
must request at least as much ECS as was attached to the original job. If reconfiguration results in insufficient 
ECS available to the user, restart is not possible. The RESTART statement should not be used within a CCL 
procedure (see section 5). 

The format of RESTART is: 

RESTART,name,n,S=xxx. 

All parameters are optional and order independent. 

name Name of checkpoint file as defined at checkpoint time. Default is CCCCCCC. 

n Number (decimal) of checkpoint to be restarted. If n is greater than the number of 

the last checkpoint taken, the restart attempt is terminated. Default is 1. 

S=xxx Ignored by RESTART; allowed for compatibility with previous systems. 

A checkpoint dump cannot be restarted in the following cases. 

A tape file necessary for restarting the program was overwritten after the checkpoint dump was taken. 

A machine error propagated bad results but did not cause abnormal termination until after another 
checkpoint dump. 

RETURN (EVICT FILE) 

RETURN performs an operating system CLOSE/RETURN function. It differs from the UNLOAD control state- 
ment only in that RETURN reduces the maximum number of tapes that can be held by the job, but UNLOAD 
does not. RETURN deletes all references to the files specified, except as noted below, and destroys the file 
contents of local files. 
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The format of RETURN is: 

RETURN4fn 1 ,lfn 2 

More than one file or multi-file set can be specified; only one is required. 

irrk M majriff qt li^K lO riK rKi.ii£Iil?U- 1°°/ iCLicia ui iu.uj.t,3 u^kuuuiik niui a inwi ui uemuv w* 

1 multi-file set tape to be returned, 1-6 letters or digits beginning with a letter, lfrij 

cannot be INPUT. 

For magnetic tape output files, RETURN causes trailer labels to be written and the file to be rewound and 
then unloaded. With the exception of members of a multi-file set, the tape units on which the file resides is 
disassociated from the job and made available to the system for new assignment. The count of the number 
of tape units logically required by the job, as set by a tape parameter on the job statement, is then decreased. 

For multi-file set names, the tape units assigned to the set are disassociated from the job and made available 
to the system for new assignment. The count of the number of tape drives required is then decreased. 

For mass storage files, RETURN causes the file to be returned. Special-named files on queue devices are 
released to the output queue associated with their dispositions. If any of the special-named files are to be 
evicted, the DISPOSE or ROUTE control statement should be used instead of RETURN. Permanent files 
return to permanent file manager jurisdiction. Other mass storage files are evicted. 

REWIND (REWIND FILE) 

REWIND positions a file at the beginning-of-information. 

For a labeled magnetic tape, this position is the start of the user's data after label information. 

For unlabeled multi-volume tapes, a REWIND causes the current volume to be rewound. 

For labeled multi-volume, single-file tapes, a REWIND causes the current volume to be rewound and the volume 
number in the system tables to be set to 1. A subsequent forward motion causes the label to be read and 
compared with the system taWes, and the operator is notified if the current volume is not number 1. 

For labeled multi-file tapes, a REWIND issued for a file causes positioning to the beginning of that file. If 
necessary, the operator is instructed to mount the previous volume. 

The format of REWIND is: 

REWIND4fn 1 ^fn 2 

More than one file can be specified; only one is required. 

lf n . Name of file to be rewound, 1-7 letters or digits beginning with a letter. 

A REWIND that references a multi-file set name is illegal; the job terminates. 
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In most cases, when a file is requested for a job, that file is positioned automatically at beginning-of-information. 
However, because of variations in installation parameters and procedures, automatic positioning can not always 
occur with every file requested. Therefore, it is best to follow the REQUEST statement with a REWIND state- 
ment to ensure that the file is positioned at its beginning when first referenced. 

RFL (REQUEST FIELD LENGTH) 

RFL requests a specific central memory field length and inhibits dynamic field length management by the 
operating system. RFL should not be used unless the job has special requirements. A REDUCE control 
statement should immediately follow the operation that requires RFL use, so that dynamic field length 
management is restored. 

For most jobs, the amount of central memory required varies with each job step. For example, a FORTRAN 
compilation might require 45000 words and a COPY routine might require 5000 words. System usage can be 
improved when memory not currently needed is freed for other jobs. The system automatically increases or 
decreases the field length assigned to a job to optimize use of system storage. 

If a job step needs more storage than would be assigned normally, RFL can be used to specify the maximum 
field length required. RFL can increase or decrease field length. 

The format of RFL is: 

RFL,fl. 

fl New field length (octal). Maximum value is established by the value of the CM 

parameter on the job statement, if any, or by an installation-determined value. The 
fl parameter must be specified; there is no default. 

ROUTE (FILE DISPOSITION) 

ROUTE directs a file to an input or output queue. Both file destination and type of further processing can 
be specified by control statement parameters. ROUTE is concerned with handling a file after it is released 
from the job, so it is not applicable to files with a fixed residence such as permanent files, private device set 
files, or files residing on other non-allocatable equipment. Unless deferred routing is requested, the file is 
released from the job immediately. 

The file must be resident on a queue device. This can be assured by specifying *Q on a REQUEST statement. 
The characteristics of a file that can be specified by ROUTE are: 

Disposition code Print, punch, and so on. 

Deferred routing Do not release the file immediately. 

External Punch card format or print train, 

characteristics 

Forms code Particular paper or card forms to use. 
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File ID 

Internal 
characteristics 

Priority 

Repeat count 

Spacing code 

Station ID 

Terminal ID 



Name identifying the file while it is in the output queue, this name is printed 
on the banner page of a printout or punched on the lace card of a punch card 
deck. 

Data is in display code, ASCII, binary, or transparent (INTERCOM 5) format. | 



Priority of file to be output at originating INTERCOM terminal. 

Number of extra copies for output files. 

Octal number of the array to be used with the 580 PFC Printer. 

Logical identifier of the computer to process the file. 

Central site or identifier of the INTERCOM terminal to receive the file. 



Unlike DISPOSE, deferred routing can be used with INTERCOM terminal ID and forms code on a ROUTE 
control statement. 

Files on public mass storage devices, except those with the special names listed below, receive a disposition 
code of scratch when they are created. At end-of-job or when the file is returned, such a file is discarded. 

Files with special names receive specific disposition and external and internal characteristic codes when they 
are created. These files are sent to the predetermined destination at end-of-job or when returned. If a special- 
named file is to be discarded, DISPOSE or ROUTE must be used. The file names with special codes are 
listed below: 



Special 

File Name Destination 

OUTPUT Print on any available printer with 

standard print train 

PUNCH Punch in Hollerith format 

PUNCHB Punch in standard binary format 

P80C Punch in free- form binary format 

FILMPR! Print on microfilm recorder 

FILMFL' Plot on microfilm recorder 

HARDPR' Print on hardcopy device 

HARDFL* Plot on hardcopy device 

PLOTt Plot on any available plotter 



Default DC Default EC 



PR 

PU 

PU 

PU 

FRt 

FLt 

HRt 

HLt 

pjt 



A6 or B6tf 



Default IC 

DIS 



026 or 029tt DIS 
SB BIN 

80COL BIN 



Format of files routed to the input queue can be dictated by operating system convention. If keywords FID, 
IC, EC, or FC are used in conjunction with DC=IN, they are ignored and no warning message is issued. 



'Supporting software must be supplied by the installation, 
it Depends on installation parameter. 
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The format of ROUTE is: 

ROUTE4fn,DEF, DC=dc, EC=ec, FC=fc , FID=fid, IC=ic , PRI=pri, REP=n , SC=nn, ST=mmf, TID=tid. 
Only lfn is required. All other parameters are optional and order independent. 

lfn Logical file name of the file to be routed, 1-7 letters or digits beginning with a 

letter, lfn cannot be INPUT. 

DEF Defer file disposition. The system stores the information about the file and disposes 

it as requested when the file is released. Files are released by RETURN and UNLOAD 
control statements, ROUTE or DISPOSE statements that specify immediate release, 
or at end-of-job. Routing of files to the input queue cannot be deferred. With 
deferred routing, the user can redefine the same file with subsequent ROUTE state- 
ments or specify characteristics of a file before the file is created. 

DEF used with DC=IN causes the ROUTE statement to be ignored. If omitted, file 
is released at ROUTE execution. DEF used with DO=SC, or DC not equivalenced, 
causes all user generated output to be discarded. The dayfile is not discarded. 

DC=dc File disposition: 

SC Evict (scratch) the file (default) FRt Print on microfilm recorder 

PR Print on any available printer FL+ Plot on microfilm recorder 

HRT Print on hardcopy device 

LR Print on 580-12 printer HLt Plot on hardcopy device 

LS Print on 580-16 printer PTt Plot on any available plotter 

LT Print on 580-20 printer IN Place file in the input queue 

PU Punch 

Use if DOIN can be restricted by the installation. If dc is not specified, DOSC is 
assumed. 

EC=e c External characteristics of the print or punch file. If EC is not specified, default EC 

code is used. 

Print Files: 

B4 Print format BCD 48 character print train 

B6 Print format BCD 64 character print train 

A4 Print format ASCII 48 character print train 

A6 Print format ASCII 64 character print train 

A9 Print format ASCII 95 character print train 



t Supporting software must be supplied by the installation. 
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Default value for JANUS print files is B6 or A6 depending on installation option. 
If EC=A9 is specified, JANUS will not print the file unless IC=ASCII is also specified. 
For all other print EC values, JANUS requires IC=DIS. INTERCOM 4 print files 
with a default EC code are printed on any available train other than B4 or A4. 
The print trains normally mounted for output from INTERCOM terminals are: 



INTERCOM 4 


INTERCOM 5 


BCD 200UT B6 


B6 


ASCII 200UT A6 


A6 


730 series batch terminal A6 


A6 


711 and 714 terminal A9 


A6 


Others 


A6 


Punch Files: 




026 Punch format 026 




029 Punch format 029 




ASCII Punch format ASCII (INTERCOM files only) 


SB Punch format binary 




80COL Punch format 80 column binary 





Default value for JANUS punch files is 026 or 029 depending on installation option. 
The only INTERCOM 4 terminal with a punch is the 733; the default is determined 
when the terminal is auto-loaded. No standard binary punching is available with 
INTERCOM 5. 

FOfc Forms code, where fc can be any two letters or digits. This parameter indicates 

special card or paper forms are to be used for output. The operator should be 
informed of the meaning of the codes so that the proper forms are mounted. Each 
installation, typically, establishes procedures for using forms codes. If FC is not 
specified, standard forms are used. 

FID=fid File name while the file is in the output queue. 

* First five characters of the file name are the same as the first 

five characters of the job name. Two unique sequence numbers, 
different from the job sequence numbers, are added in the 
sixth and seventh positions. 

fffff First five characters of the file name are fffff. This name is 

printed on the banner page of a printout or punched on the 
lace card of a punch card deck. Any combination of one to 
five letters or digits can be specified, with the first character 
a letter. The two unique job sequence characters added by 
the system to the job name are used as the sixth and seventh 
characters of the file name. If fffff is less than five characters, 
the name is filled with display code zero through the fifth 
position. 
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*fffff 



IC=ic 



PRI=pri 



Equivalent to FBD=fffff except two unique sequence numbers, 
other than the job sequence numbers, are added in the sixth 
and seventh positions. 



If fid is not specified, file name while the file is in the output queue is the same as 
the job name. Default. 

Internal characteristics of the file: 

DIS File format is display code; default. 

ASCII File format is ASCII. 

BIN File format is binary. 

TRANS File format is transparent (INTERCOM 5). 

IC=DIS is required by JANUS for all print files except where EC=A9, in which case, 
IC=ASCII is required. Files can be printed at INTERCOM 4 terminals when IC=DIS 
or IC=ASCII is specified with any EC parameter. IC=BIN is required for binary 
punch files. At INTERCOM 5 terminals, IC=ASCII and IC=BIN are not allowed, and 
IC=TRANS can be specified only at HASP or 2780/3780 terminals. If IC is not 
specified, IODIS is assumed. 

Priority level for a file to be output at originating INTERCOM terminal, 14 (octal) 
digits. PRI can be used to enter a priority for a file to be entered into the remote 
output queue. In any other instance, the parameter is ignored. If pri is not specified, 
file receives standard priority. 



REP=n 



SOnn 



ST=mmf 



TID=tid 



Repeat count for output files, n< 37B. If n is not specified, there are zero extra 
copies. 

Spacing code for output sent to a 580 PFC printer, nn is an octal value, to 77B, 
indicating an installation-defined spacing code array. Zero indicates the default array. 
All other values of nn are defined at the installation. See a site analyst for valid 
nn values . If nn is not specified, SC=0 is assumed. 

The logical identifier of the system responsible for processing the file. If DC=IN, 
mmf is the logical identifier of the system where the job is executed. The ST param- 
eter on the ROUTE control statement overrides an ST parameter on the job statement 
of the routed file. If the DC parameter specifies an output queue, mmf is the system 
where the file is output. If mmf is not specified, process the file on the system where 
it originated. 

INTERCOM terminal identification. File is to be returned to terminal identified. 
If tid=C, file is to be output at central site. If tid is not specified, file is to be 
returned to the site or terminal where the job originated. 
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ROUTE EXAMPLES 

1. job statement 

R0UTE(L0ONJDEFJ)C=FRJEC=A9,IC=ASCiI) 



EXIT. 
R0UTE(LO0N,DC=SC) 

7/8/9 



6/7/8/9 

This job creates a long file in ASCII format for a printer with an ASCII 95-character print train. 
If job aborts, the file is scratched. If job terminates normally, file LOON is printed after operator 
mounts 95-character print train. The file is referenced before it is created. The routing information 
is saved and used when the file is sent to the output queue. 

2. job statement 

REQUEST (SWALLOW,*Q) I 

COPY(INPUT > SWALLOW) 

ROUTE(SWALLOW,DC=IN) 



7/8/9 
SWALLOW.STABC. 



7/8/9 



6/7/8/9 

The job file SWALLOW is executed on system ABC. 

job statement 

COPYBF(INPUT,FALCON) 

ROUTE(FALCON,DC=IN,ST=ABC) 

7/8/9 

HAWK.T100. 

COPYBF(INPUT,OWL) 

REWIND(OWL) 

COPYBF(OWL,EAGLE) 

ROUTE(OWL,DC=PR) 

ROUTE(EAGLE,DC=PR ) ST=DOG) 
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7/8/9 



4. 



6/7/8/9 

This job creates a file FALCON, which is all but the control statements of the job. File FALCON 
is sent to the input queue of system ABC where it is known as job HAWK. Job HAWK produces 
file OWL to be printed on system ABC and file EAGLE to be printed on system DOG. 

job statement 

COPY(INPUT,SWIFT) 

OURTE(SWIF,DC=IN,ST=DOG) 



7/8/9 
SWIFT,STABC. 



7/8/9 



6/7/8/9 

When the ST parameter is specified on ROUTE and on the job statement of the file being routed, 
the ROUTE control statement overrules the job statement. Job SWIFT is executed on system 
DOG. 

5. job statement 



ROUTE(PlPIT,DEFJM>PR) 



RETURN(PIPIT) 



7/8/9 



6/7/8/9 

When the control statement RETURN(PJPIT) is executed, the file PIPIT is sent to the output queue 
to be printed. PIPIT is not scratched. 
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job statement 



R0UTE(GREBE,DEF,EC=A6,IC= ASCII) 



R0UTE(GREBE,DEF,EC=A9) 



ROUTE(GREBE,DC=PR) 



7/8/9 



6/7/8/9 

The file named GREBE is printed on a printer with a 96-character ASCII print train. When the 
first ROUTE is executed, an EC of A6 and IC of ASCII are recorded. When the second ROUTE 
is executed, the EC is changed to A9. Since the IC parameter does not appear, its value does not 
change. When the third ROUTE is executed, the file GREBE is sent to the output queue to be 
printed. Subsequent references to an lfn of GREBE refer to a new file with the same name. 

MURRE. 



ROUTE(ALCID,FID=* > DC=PR) 



7/8/9 



6/7/8/9 

Suppose the two unique sequence characters added to the job name by the system are 3F. The 
job is then known as MURRE3F. If the next sequence characters were 3Z when ROUTE is 
executed, the file ALCID would be given the name MURRE3Z when it is printed. 
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8. BIRDS. 



ROUTE(TERN,FID=*TERN) 



7/8/9 



6/7/8/9 

Suppose the sequence characters are as in example 7. Then the file TERN is printed as TERN03Z. 
9. BIRDS. 



ROUTE(TERN,FID=TERN) 



7/8/9 



6/7/8/9 

Suppose the sequence characters are as in examples 7 and 8. Then the file TERN is printed as 
TERN03F. 



SAVEPF (CATALOG PERMANENT FILE ON LINKED MAINFRAME) 

SAVEPF makes an existing local file a permanent file on the mainframe specified. SAVEPF differs from the 
CATALOG control statement in that SAVEPF can catalog a file at a mainframe other than that where the 
job is executing; CATALOG cannot. 

The format of SAVEPF is: 

SAVEPF4fn,pfnJD=name,AC=act,CN=cn,CY=cy3X=ex ) FO=fo^D=™d>IR^^JW=pwJU>=rd,RP=rp, 
RW*p,ST=mmf,TK=tk,XR=xr. 

The lfn and ID parameters are required in the order shown. All other parameters are order independent. 
The ST parameter is required; other parameters might he required, as noted with CATALOG. Any SN 
parameter is ignored. If a terminator does not appear at the end of the parameter list, column 1 of 
the next card or line is considered to be a continuation of the SAVEPF parameter list. 
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lf n Logical file name by which the file is presently known to the job, 1-7 letters or digits 

beginning with a letter. This name does not become part of the permanent file 
identification. 

pf n Permanent file name by which the file is known in permanent file manager tables, 

1-40 letters or digits. If pfn is omitted, lfn is used. 

ID=name Owner or creator of file. 

ST=mmf System on which file is to be cataloged, 3 characters. The values for mmf are 

established at installation time. 

When the ST parameter designates a mainframe running SCOPE 2, the file structure must adhere to 
SCOPE 2 Record Manager defaults; otherwise a FILE statement must be used. For example, the 
SCOPE 2 FORTRAN and COBOL compilers expect the source program to be in W type record format. 
A program created under the NOS/BE INTERCOM Editor consists of Z type records and cannot be 
compiled directly by SCOPE 2 compilers. 

Example: 

A user writes a program under the Editor CREATE command and makes the file local to the job 
with a SAVE.ZZZ command. The user then enters the following statement to make the file 
permanent under SCOPE 2: SAVEPF^ZZJD=XX,ST=MFZ., where MFZ is the mainframe running 
SCOPE 2. The system responds with WAITING FOR MMF SAVEPF. This message appears even 
if the SCOPE 2 mainframe is down or not available. When INTERCOM responds with .., the file 
has been transferred and made permanent. 

To compile and execute the program made permanent on SCOPE 2, the user creates the following 
file under the Editor CREATE command. 

SCOPE 2 job statement. 

SCOPE 2 account statement. 

FILE,ZZZ,RT=Z,BT=C,FL=80. 

ATTACH,ZZZ,ID=XX. 

FTN4=ZZZ. 

LGO. 

With the SAVE and BATCH commands, the user makes the file local and then submits the job. 
The program on file ZZZ is attached, compiled, and executed. The job aborts if the FILE state- 
ment is not included, since the FORTRAN compiler would expect W type records. 

See the CDC CYBER Record Manager manuals and the SCOPE 2 Operator's Guide for additional details 
on file conversion requirements. 

See the CATALOG control statement for the remaining parameters. 
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SETNAME (ESTABLISH IMPLICIT SETNAME) 

SETNAME indicates the device set to be referenced implicitly by subsequent ATTACH, PURGE, and REQUEST 
control statements. When SETNAME is not used, these control statements implicitly reference a system device 
set. 

The format of SETNAME is: 

SETNAME,setname. 

The parameter can be omitted. 

setname Name of device set to be referenced implicitly, 1-7 letters or digits beginning with a 

letter. If omitted, public device sets are assumed. 

A second SETNAME control statement overrides the first. 

SETNAME is explicitly overridden by an SN=setname parameter on a REQUEST, ATTACH, or PURGE control 
statement. An SN that does not specify a setname on a REQUEST control statement does not override the 
SETNAME control statement. A rotating mass storage REQUEST which does not have an SN parameter will 
always reference public device sets. 

SKIPB (SKIP BACKWARD SYSTEM-LOGICAL-RECORDS) 

SKIPB bypasses one or more system-logical-records in a reverse direction. Current file position can be any 
point within a record when the control statement is executed. The file must have system-logical-record 
structure. SKTPB cannot be used with tapes in S or L format and should not be used with CDC CYBER 
Record Manager file organizations unless RT=S. 

The format of SKIPB is: 

SKIPB.lfn.n.lev.mode. 

Parameters are positional; only lfn is required. 

I*" 11 Logical file name, 1-7 letters or digits beginning with a letter. 

n Number of system-logical-records of level lev or greater to be skipped, 1-262142 

(decimal). Default is 1. A value greater than 262142 is treated as a rewind request. 

lev Level number, 0-17 (octal). Default is 0. 

mode File mode applicable to tape files only: 

B Binary; default. 

C Coded 



| 4-92 



60493800 E 



Skipping stops when the specified number of terminators containing the specified level have been bypassed or 
beginning-of-information is encountered. At the end of SKIPS, the file is positioned immediately following 
the system-logical-record terminator examined last. When the file is positioned immediately following a system- 
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SK'PF (SKIP FQRWAP.D SYSTEM-LOGICAl-RECORDS) 

SKIPF bypasses one or more system-logical-records in a forward direction. Current file position can be any 
point within a record when the control statement is issued. The file must have system-logical-record structure. 
SKIPF cannot be used with tapes in S or L format and should not be used with CDC CYBER Record Manager 
file organizations unless RT=S. 

The format of SKIPF is: 

SKIPF,lfn,n,lev,mode. 

Parameters are positional; only lfn is required. 

lfn Logical file name, 1-7 letters or digits beginning with a letter. 

n Number of system-logical-records of level lev or greater to be skippf -262142 

(decimal). Default is 1. 

lev Level number, 0-17 (octal). Default is 0. 

mode File mode applicable to tape files only: 

B Binary; default. 



Skipping stops when the specified number of terminators containing the specified level have been bypassed or 
end-of-information is reached. At the end of SKIPF, the file is positioned immediately following the system- 
logical-record last examined. 

A value greater than 262142 for the number of records to be skipped causes a rotating mass storage file to be 
positioned at end-of-information. For a tape file, a similar parameter causes the file to remain at its current 
position. 

SUMMARY (ACCOUNT SUMMARY) 

SUMMARY obtains an accounting summary up to the point in the job where the statement is encountered. 
The accounting summary, which appears in the job dayfile, lists resources used to this point in the job. The 
resources used by a job step can be determined by executing a SUMMARY statement before and after the 
job step and subtracting the resulting values. The summary output is the same as the accounting summary 
generated at end-of-job. 
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The format of SUMMARY is: 
SUMMARY. 

The discussion of the dayfile in section 2 gives details of summary output. 

SWITCH {SET SOFTWARE SWITCH) 

SWITCH sets one of the six software switches available for each job. At the start of job execution, all 
switches are zero. Execution of SWITCH changes the current setting to its opposite mode. 

In program branching, where two alternate processing routes are provided, the software sense switch is frequently 
used to determine the path taken. This switch is a bit in central memory that a user's program can reference. 
A program might contain a request to take one path if the bit is set to one (on) and another if it is zero (off). 

The format of SWITCH is: 

SWITCH,n. 

n Number of switch to be changed, i-6. The n parameter must be specified; there is 

no default. 

Switches also can be set by the central site operator, a terminal user, or a program in a language that supports 
switch operations. 

The following example changes switch 4 to ON, then OFF, then ON again. 

SWITCH,4. Set switch to 1. 

SWITCH,4. Resets switch to 0. 

SWITCH,4. Resets switch to 1. 

SYSBULL (ACCESS SYSTEM BULLETIN) 

SYSBULL copies request system bulletins to the OUTPUT file. 
The format of SYSBULL is: 
SYSBULL, P j,p 2 , . . . ,p n . 
Parameters are all optional. 
Pj Bulletin names, ALL, or INDEX: 

ALL Lists all bulletins. Any other parameters are ignored. 

INDEX Lists index of all bulletins available. Default. 
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INTERCOM makes a call to SYSBULL whenever a user logs in. The calls are: 
SYSBULL(LOGIN) If SUP is not specified. 

SYSBULL(SUP) If SUP is specified. 
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immediately displayed. If SYSBULL does not find the system bulletin permanent file or the specific bulletin 
LOGIN or SUP, processing continues. 

The operating system calls SYSBULL for each batch job entered in the system. 

The call is: 

SYSBULL(BATCH) 

SYSBULL automatically attempts to find the bulletin named BATCH. If found, it is the first item printed on 
OUTPUT. If SYSBULL does not find the system bulletin permanent file or the specific bulletin BATCH, pro- 
cessing continues. 

TRANSF (DECREMENT DEPENDENCY COUNT) 

TRANSF decrements the dependency count for jobs in an interdependent job string. The user can submit a 
string of interdependent jobs to the computer, specifying the order in which they are to be executed. In 
such a string, jobs can be input in any order and from central site or remote card readers. A job is not 
executed until all prerequisite jobs in the string have been executed. Whenever possible, the operating system 
schedules interdependent jobs for execution in parallel (multi-programming). 

As each job is input, dependency identifier and dependency count on the job statement are noted. The 
dependency count is decremented by TRANSF control statements in prerequisite jobs. When the count of 
a dependent job becomes zero, it executes. 

The Dym parameter on the job statement establishes job interdependency. y is the dependency identifier that 
names the string to which the job belongs, m is the dependency count (number) of prerequisite jobs on 
which the job depends. 

TRANSF must appear after the control statements that execute the prerequisite programs. In multi-mainframe 
configurations, a string of interdependent jobs must execute on the same mainframe. TRANSF should not 
appear in the last job in the string since no jobs can depend on it. 

The format of TRANSF is: 

TRANSF job t job 2> .... 

Multiple job names or multiple TRANSF control statements can be used. 

job. Name of job whose dependency count is to be decremented. Only the first five 

characters of each job name are used, with the dependency string identifier maintaining 
proper identification. 
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If a job containing a TRANSF control statement is terminated before that control statement is processed, the 
dependency count of other jobs is not decreased. Instead, all succeeding jobs that depend on this job remain 
in the input queue. No error message indicates that a job in a dependent string has terminated abnormally. 
The operator decides whether the remaining jobs should be evicted or forced into execution. A message 
instructing the operator can be placed in a routine after a RECOVR function, or on a PAUSE statement 
following an EXIT statement. 

An example of an interdependent job string JS follows. Consider jobs with names JOBA through JOBF. 

JOBB is dependent on successful execution of JOBA 

JOBC on JOBA 

JOBD on JOBB and JOBC 

JOBE on JOBC 

JOBF on JOBB, JOBD, and JOBE 

The control statements should appear with: 

JOBADJSOO. JOBB,DJS01. 

execution call execution call 

TRANSF(JOBB,JOBC) TRANSF(JOBDJOBF) 



7/8/9 7/8/9 

JOBC,DJS01. JOBD,DJS02. 

execution call execution call 

TRANSFCJOBDJOBE) TRANSF(JOBF) 

7/8/9 7/8/9 

JOBE,DJS01. JOBFJDJS03. 

execution call execution call 

TRANSF(JOBF) 7/8/9 
7/8/9 

JOBF, which can execute only if all other jobs in the string are successful, has a dependency count of 
3, the number of jobs containing TRANSF references to JOBF. 

TRANSPF (TRANSFER PERMANENT FILE) 

TRANSPF changes the residence of permanent files and permanent file tables within a device set so that all 
permanent file information can be removed from a device. It also copies files from one device set to another. 
These operations are known as a single device set transfer and a dual device set transfer, respectively. 

Before TRANSPF can be executed, a permanent file with name of DUM and ID of PUBLIC must be cataloged 
on the device set specified by the FS parameter. If this is not done, TRANSPF aborts. TRANSPF issues an 
internal ATTACH of the permanent file DUM; the passwords submitted in tills ATTACH are those submitted 
via the PW parameter on the TRANSPF request. If a DUM permanent file with TK=DUMPF already exists 
(earlier systems required this), it must be purged and replaced as described above. If TRANSPF is unable to 
attach the permanent file DUM, the function aborts. 
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Before TRANSPF is called, a MOUNT control statement must be executed for the master devices of the device 
sets specified by the FS and TS parameters. TRANSPF cannot be ran on a shared device set. 

The format of TRANSPF is: 

TRANSPF,FW=pw,FS=setname j ,TS=setname 2 JFM=vsnj ,TM=vsn 2 ,LF=lfn. 

Parameters FS and TS are required; FW is required if passwords have been defined for file DUM. 
Remaining parameters are optional. All parameters are order independent. If a terminator does not 
appear at the end of the parameter list, column 1 of the next card or line is considered to be a 
continuation of the TRANSPF parameter list. 



PW=pw 



Specifies read, control, modify, and extend passwords, separated by commas, if defined 
for permanent file DUM. If passwords have been defined for file DUM, all must be 
specified with this parameter or the utility aborts. No default exists. 



FS=setname 



Name of device set from which permanent file information is to be transferred; 1-7 
letters or digits beginning with a letter. Default is the permanent file default set. 



TS=setname2 Name of device set to which permanent file information is to be transferred; 1-7 

letters or digits beginning with a letter. Default is the permanent file default set. 



FM=vsn 



1 



Volume serial number of member device from which permanent file information is to 
be transferred; 1-6 letters or digits with leading zeros assumed. Required when TS 
and FS specify the same setname. When TS and FS specify different setnames, all 
devices in the set are assumed and the FM parameter cannot be specified. 



TM=vsn* 



Volume serial number of member device to which permanent file information is to 
be transferred; 1-6 letters or digits with leading zeros assumed. Data that cannot be 
contained on this device overflows to another member of device set specified by TS, 

WA.V/&pb null luM ills uv/i UTViuv/n i\j t-iiG iiivuiuvi a^tC^uiCu isy riu wuvji X kj auu ru 

specify the same setname. Required when TS and FS specify the same setname and 
FM specifies a master device. When TS and FS specify different setnames, TM cannot 
be specified. Default is all devices in device set specified by the TS parameter. 



LF=lfn 



Name of file on which output listing is written; 1-7 letters or digits beginning with a 
letter. Default is OUTPUT. 



SINGLE DEVICE SET TRANSPF 

A single device set TRANSPF is requested if the device set specified by the FS parameter is the same as the 
device set specified by the TS parameter. 



TRANSFERRING FROM A MEMBER 

If the FM parameter does not specify a master device, permanent files residing on the FM device are moved to 
the TM device. A file is moved if any part resides on the FM device. Once the file has been transferred, the 
disk space associated with the old copy is released. If the file cannot be completely contained on the TM 
device, the file overflows to any other device in the set except the FM device. If the transfer of a file is 
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unsuccessful, that file is skipped, but TRANSPF is not aborted. A file transfer can be unsuccessful because of 
uncorrectable parity errors, not enough space in the device set to accommodate two copies of the file simulta- 
neously, or permanent file catalog full. When all permanent file information is successfully transferred from 
the FM device, that device is no longer a permanent file device. 



TRANSFERRING FROM A MASTER 

When the FM parameter specifies a master device, the device set tables are moved to the device specified by 
TM, and the device labels for both devices are updated to reflect the new organization of the device set. If 
the tables cannot be successfully moved, the device set is not changed by the TRANSPF utility. Table trans- 
fers can fail because of uncorrectable parity errors, or not enough space on the TM device to completely con- 
tain the disk tables. The system must be idle before TRANSPF is executed for table transfer. 

After the master device is successfully changed, permanent files residing on the FM device are moved to the 
TM device as described above. When all permanent file information is transferred from the FM device, that 
device is no longer a permanent file device. 

Examples of single device set transfer are: 

1. FIRST. 

MOUNT(SN=TEST,VSN=999) Mount master. 

TRANSPF(FS=TEST,TS=TEST,FM=999,TM=1 1 1 ,PW=A,B,C JD) 

6/7/8/9 

This job transfers all permanent files and permanent file tables from the master device with VSN 
of 999 to the member device with VSN of 111. Both devices belong to device set TEST. The 
member device with VSN=1 1 1 was not explicitly mounted. The system initiates the mount of the 
member when actual I/O is requested by TRANSPF. If this job runs successfully, device 1 1 1 is 
the master device of set TEST. 

If the tables do not fit on the device with VSN=111, the set is not changed, and the job ends. 
If the tables are successfully transferred but the permanent files do not fit on the device with 
VSN=1 11, the files overflow to any devices in the set TEST except the device with VSN=999. 

The permanent file DUM is assumed to have been previously cataloged with passwords A,B,C,D on 
device set TEST. 

2. SECOND. 

M0UNT(SN=TEST1,VSN=555) Mount master. 

TRANSPF(FS=TEST1,TS=TEST1,FM=888,TM=222,PW=Q,R,S,T) 

6/7/8/9 

This job transfers all permanent files from the member device with VSN=888 to the member device 
with VSN=222. Both members belong to the device set TEST1. The members with VSNs of 
888 and 222 were not explicitly mounted. The system initiates the mount of these members when 
actual I/O is requested by TRANSPF. 
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DUAL DEVICE SET TRANSPF 

A dual device set TRANSPF is requested if the device set specified by the FS parameter is different from the 
device set specified by the TS parameter. TRANSPF transfers permanent files by simulating the following 
sequence of control statements. 

REOUEST(lfn 9 ,SN=setname 2 ) 

ATT ACHflfn t ,pfn,ID=ownertsN=setname l ) 

COPY(lfn L 4fn 2 ) 

CATALOG(lfn 2) pfn ) ID=owner) 

RETURNOftijJfn^ 

All files residing on the device set specified by the FS parameter are transferred to the device set specified by 
the TS parameter. The FM and TM parameters cannot be used and no member devices can be specified. After 
a successful transfer of a file, two copies of the file exist, one in the FS device set and one in the TS device 

set. 

A permanent file transfer might be unsuccessful if lfn has an uncorrectable parity error, CATALOG is unsuccessful 
for reasons such as unavailable table space, or if insufficient disk space is available on the TS device set to con- 
tain the file. 

In a dual device set transfer, the disk tables are not moved as a separate entity. Critical tables are only moved 
within a device set and never from one device set to another. 

Example of dual device set transfer: 

JOB. 

MOUNT(SN=BOB,VSN=1944) Mount master. 

MOUNT(SN=TOM,VSN=1984) Mount master. 

TRANSPF(FS=BOB,TS=TOM,PW=m,PW2,PW3,PW4) I 

This job moves permanent files from the device set BOB to the device set TOM. 

UNLOAD (EVICT FILE) 

UNLOAD performs an operating system CLOSE/UNLOAD function. It differs from RETURN only in that 
RETURN reduces the maximum number of tapes that can be held by the job, but UNLOAD does not affect 
the tape count. UNLOAD deletes all references to the files specified, except as noted below. 

The format of UNLOAD is: 

UNLOAD4fn,Jfn 2 , .... 

More than one file or multi-file set can be specified; only one is required. 

lfn. Name of file to be unloaded, 1-7 letters or digits beginning with a letter. Can be a 

member of a tape multi-file set; cannot be INPUT. 

Name of multi-file set of tape to be unloaded, 1-6 letters or digits beginning with a 
letter. 
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For tape files, tapes are rewound and unloaded after any necessary labels are written. The tape drive is then 
made available for new assignment. However, UNLOAD cannot override an IU (inhibit unload) parameter on 
the REQUEST control statement for the file. When the IU parameter exists, a subsequent unload rewinds, 
but does not unload, the tape. 

For mass storage files, UNLOAD causes the file to be returned. Special-named files on queue devices are 
released to the output queue associated with their disposition. If any of the special-named files is to be 
evicted, the DISPOSE or ROUTE control statement should be used rather than UNLOAD. Permanent files 
return to permanent file manager jurisdiction. Other mass storage files are evicted. 

VSN (TAPE VOLUME IDENTIFICATION) 

VSN has two functions for tape files. 

It relates the external sticker (volume serial number) for a tape to the logical file name. 

It provides information for the tape prescheduling display at the operator console. Since the operator 
is then aware of upcoming tape requests, he can mount the required tapes so the system can access 
them without further operator action. 

The VSN control statement can be used in place of a VSN parameter on a REQUEST or LABEL control 
statement. VSN execution does not affect either the checking or writing of tape labels. It can be specified 
for labeled or unlabeled tapes. 

The format of VSN is: 

VSN4fn 1 = vsn|Jfn2=vsn2, .... 

One statement can be used for any number of files. Multiple VSN control statements can be used. VSN 
can be continued; if the parameter list does not end with a terminator, column 1 of the next control 
statement is considered a continuation of column 80. 

lfiij For a single file, the logical file name of 1-7 letters or digits beginning with a letter. 

For a multi-file set, the multi-file set name of 1-6 letters or digits beginning with a 
letter. 

vsnj Volume serial number of 1-6 letters or digits with leading zeros assumed. A vsn of 

or SCRATCH, or omission of =vsn, results in scratch tape assignment. 

If any of several alternate volumes suffice, equals signs should separate identifiers, as 
in FILE=1234=1235. 

If the file is to be assigned to a multi-volume set, VSNs should appear, separated by 
slashes, in the order that volumes are to be accessed as in BIGFILE=1ST/2ND/ / 
LAST. 
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If conflicting volume serial numbers are given for a single tape file, the first encountered is used. However, 
duplicate specifications on the same control statement produce a fatal error. 

VSN statements can be placed anywhere in the control statements as long as they precede the REQUEST or 
LABEL control statement that associates the file with the job. If a logical file name is to be re-used during 
a job, such as OLDPL for two UPDATE operations, the first file should be released by an UNLOAD or 

VSN EXAMPLES 

1. JOB5.MT1. 
VSN(TAPE1=1234) 
REWIND.TAPEl. 

The VSN control statement has no effect, because no REQUEST or LABEL control statement 
appears for file TAPEl. File TAPE1 is opened as a disk file. 

2. J0B6.MT1. JOB7.MT1. 

VSN(TAPE1=1234) REQUEST(TAPE1 ,VSN=1 234,MT,E > NORING) 

REQUEST(TAPE1 JMT.E.NORING) 

To have a specific magnetic tape assigned to the job, either of the above requests would suffice. 

3. JOB8,GEl. 
VSN(TAPE1=0) 
REQUEST(TAPE1,GE,N,IU) 

A 679 GCR unit with any tape mounted that meets the installation criteria for a scratch tape is 



4. JOB9.PE1. 

VSN(TAPE1=0) 
REQUEST(TAPE1 ,GE,N,IU) 

A 669 or 679 unit with any tape mounted that meets the installation criteria for a scratch tape 
is assigned. 
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CDC CYBER CONTROL LANGUAGE (CCL) 



INTRODUCTION 

The CDC CYBER Control Language (CCL) provides control statement manipulation. Various verbs allow selec- 
tion of CCL capabilities. The user can employ CCL to conditionally skip or process control statements and to 
process and reprocess a group of control statements. Other CCL verbs control processing of control statements 
in a file other than the job file. A CCL verb appears at the beginning of a CCL control statement, preceding 
any separators or terminators; a verb is only part of a CCL statement. 

The following verbs cause control statements (including CCL control statements) to be skipped or processed 
conditionally. 

IFE If the IFE expression (for example, A=B) is true, processes following statements; if 

it is not true, skips until a terminating statement is encountered. 

SKIP Skips until a terminating statement is found. 

ELSE Terminates and initiates IFE skipping. 

ENDIF Terminates IFE, SKIP, and ELSE skipping. 

The following pair of CCL verbs allows the user to process and reprocess a group of control statements 
(including CCL statements). 

WHILE Brackets a group of control statements and establishes the beginning of the group. 

TO... _„,,„ J„ „ rn „aeeaA go Inns oe fV««» WHIT In ovnrACcinn (fr>r PY3Tnnl«» R 1 <3^ IS tflje- 

X LLC giUUU 13 piUVCUI/U dd lWllg **3 niv/ Ti&a&uu Wlfi w3*vii ^*v^ ...m."-^-— , ^-» , — =*»- 

ENDW Brackets a group of control statements and establishes the end of the group. 

The user can manipulate CCL symbolic names with the following verbs. A symbolic name is an alphanumeric | 
character string recognized by CCL. CCL associates a constant or variable numeric value with a symbolic name. 

SET Allows the user to alter the values of variable symbolic names. 

DISPLAY Evaluates an expression (for example, 2+3) and prints the result in the dayfile in both 

octal and decimal. 

CCL also provides the following functions to be used within an expression. 

FILE Determines the attributes of a file. 

DT Determines the type of device on which a file resides. 

NUM Determines whether a parameter has a numeric value. 
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CCL provides verbs and commands to control processing of control statements (including CCL statements) in a 
file other than the original job file. A group of these separate control statements is called a procedure. The 
following CCL verbs deal with procedures. 

BEGIN Initiates processing of a procedure. 

REVERT Returns processing from a procedure to the control statement sequence that called it. 

A procedure is identified to CCL and to the operating system by the following header statement. 

.PROC Identifies the statements that follow as a procedure. 

The following commands, similar to directives, control processing of data within a procedure. 

.DATA Allows data needed by a procedure to be stored within that procedure. 

■EOR Causes an end of record to be written on a data file. 

•EOF Causes an end of partition to be written on a data file. 

* Allows the user to include comments in a procedure; these comments are not printed 

in the day file. 

CCL statements have a syntax similar to, but not identical to, the operating system's control statement syntax. 
The asterisk (*) and all system separators are valid CCL separators. A CCL statement consists of a CCL verb 
followed by parameters and separators. The separator following the verb in a CCL statement must be a comma 
or a left parenthesis. The separator between parameters must be a comma. A CCL statement must be termi- 
nated by a period or a right parenthesis. Within a statement, an expression or function can end with a right 
parenthesis. If this occurs at the end of the statement, the right parenthesis does not serve as the statement 
terminator. An additional terminator must be included to complete the statement. (INTERCOM will not add 
a second command terminator for CCL statements entered via INTERCOM.) Literals ($-delimited character 
strings) are recognized within all CCL statements but might not be evaluated during substitution within a pro- 
cedure (covered later in this section). CCL ignores all blanks in CCL statements, except blanks within a literal. 
Blanks cannot be used within a verb. Any CCL statement may continue over more than one card or line if 
the last character of a continued card or line is a valid CCL separator. 

EXPRESSIONS 

A CCL expression consists of operators and operands. It may include other expressions that are enclosed in 
parentheses [for example, the expression 2*(3+5) contains another expression, 3+5] . Parentheses do not imply 
multiplication [for example, 2(3+5) is not a valid expresssion] . 

OPERATORS 

The three types of CCL operators are arithmetic, relational, and logical. Arithmetic operators perform the 
various arithmetic operations. The relational operators produce a value of one if the relationship is true and 
zero if it is false. Logical operators evaluate the full 60 bits of each operand, producing a 60-bit result. If a 
CCL statement or relational operator evaluates this result as true or false, CCL considers a result with any bits 
set to be non-zero (true) and a result with no bits set to be zero (false). 
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ARITHMETIC 

+ 



RELATIONAL 
.EQ. or = 
.LT. or < 
.GT. or > 

.NE. 
XE. 
.GE. 

LOGICAL 

.EQV. 
.OR. 
.AND. 
.XOR. 

.NOT. 



Addition 

Subtraction 

Multiplication 

Division 

Exponentiation 



Equal 

Less than 

Greater than 

Not equal 

Less than or equal 

Greater than or equal 

Equivalence (If A.EQV.B is true, all 60 bits are set.) 

Inclusive OR (Any bit set in either A or B is set in the result.) 

AND (If A and B are true, A.AND.B is true.) 

Exclusive OR (A bit is set in the result if the corresponding bit is set in either A or B 
but not both.) 

Complement (If A is or no bits are set, NOT A is all 60 bits set.) 
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ORDER OF EVALUATION 

Exponentiation 

Multiplication, division 

Addition, subtraction, negation 

Relations 

Complement 

AND 

Inclusive OR 

Exclusive OR, equivalence 

If there is more than one operation of the same order, evaluation is from left to right. 

OPERANDS 

The four types of CCL operands are expressions, integer constants, symbolic names, and CCL functions. Any 
operand can be preceded by a leading plus or minus sign. A leading plus is ignored and a leading minus 
indicates negation. 

Expression A CCL expression enclosed in parentheses; expression is evaluated and the result is 

an operand. 

Integer constant A character string of 1 to 10 characters. An integer constant can be either numeric 
or a literal. 

Symbolic name An alphanumeric character string of 1 to 10 characters that is recognized by CCL. 

(A symbolic name has a numeric value, which is either an installation-defined constant 
or a user- or CCL-defined variable.) 

CCL function A special operand recognized by CCL; determines the attributes of a file or a char- 

acter string. (An expression can consist entirely of a CCL function.) 

EXPRESSIONS 

For all practical purposes, an expression may be as long as the user wishes, provided there is either a ) or a . 
within the first 50 operands. 

CCL assumes any character string beginning with a numeric character is numeric. It cannot contain any non- 
numeric characters, except for an optional post radix of B or D. Any alphanumeric string must begin with an 
alphabetic character. 
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Expressions may be used with CCL control statements IFE, WHILE, DISPLAY, and SET and the FILE 
function. The separator preceding an expression is not part of the expression; using a comma for this 
separator, rather than a left parenthesis, improves readability. The separator following the expression must be 
a comma. Computations are accurate to 10 decimal digits (20 octal digits), and overflow is ignored. 



INTEGER CONSTANTS 

An integer constant is generally numeric, although it can also be a literal. It must be 10 characters or less, 
including the post radix if it exists. Integer constants can be specified with or without a post radix. If the 
post radix is omitted, the constant is assumed to be decimal. A post radix of B indicates octal, and a post 
radix of D indicates decimal. 

A literal (a $-delimited character string) must be 10 characters or less, excluding the $ delimiters. If CCL 
encounters a literal, it is evaluated, and its display code value is right-justified and processed as an integer 
constant. 



SYMBOLIC NAMES 

A symbolic name is an alphanumeric character string that points to a location where a numeric value is stored. 
These numeric values can be defined at installation or can be variables set by the user or by CCL. All vari- 
ables, except EM, OT, and SYS, have an initial value of zero. 

The symbolic names in table 5-1 and the symbolic names with the true or false values are valid in any CCL 
expression but meaningless within FILE or DT functions. FILE and DT functions have their own symbolic 
names. 

Each symbolic name in table 5-1 has one or more of the following attributes. 

Local An X in this column indicates that the value is saved by a BEGIN statement before 

llUuauiig a piuteuure auu icSiuicu Dy a ix^Y£>ivi M-dicmcm u^uix iciiiiiiiaiiuii ui a 

procedure (procedures are explained later in this section). 

Set An entry in this column indicates that the symbol has a variable value. The entry 

specifies how the symbol obtains its value. One or more of the following characters 
can be listed in this column for each symbolic name. 

B Set by BEGIN 

Set by the operating system 

R Set by REVERT 

U Set by a user on the SET control statement or the SETJCI macro 

Compare An entry in this column is a symbolic name. The symbolic name with a compare 

entry is a subset of that entry name and may be compared to it. For example, CPE 
has the entry EF in the compare column. To find out if an error was a CPU abort, 
the value of EF could be compared to the value of CPE using a CCL statement, such 
as IFE (covered later in this section). For example, if IFE, EF=CPE, LS. is true, 
the error was a CPU abort. 
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TABLE 5-1. SYMBOLIC NAMES WITH ARITHMETIC VALUES 



Name Local Set Compare User's Range of Values 



Rl 

R2 

R3 

RIG 

DSC 

EF 
EFG 
TLE 
ARE 

PPE 

CPE 



MNE 

ODE 

PSE 

ESE 

MSE 
OT 



X 
X 
X 

X 



u 
u 
u 
u 

U,0 

U,0 
U,0 



EF 
EF 

EF 
EF 



EF 

EF 
EF 

EF 

EF 



to 131071D or 377777B 
to 131071D or 377777B 
to 131071D or 377777B 
to 131071D or 377777B 
and 1 

to 62D or 76B 
to 62D or 76B 



Description 







Value in control register 1. 

Value in control register 2. 

Value in control register 3. 

Value in global control register 1. 

Dayfile skipped control statement flag 
(1 = skipped control statements 
printed in dayfile). 

Error Flag. 

Global error flag. 

Time limit error; time limit was exceeded. 

Arithmetic error; user had a floating- 
point arithmetic error or a read or 
write outside of SCM or LCM range. 

PPU abort; a peripheral processor 
program aborted. 

CPU abort; job supervisor detected 
an error, or the system processed an 
ABORT macro and found no 
REPRIEVE macro. 

Monitor call error; a user's RA+1 
request contained an error. 

Operator drop; a drop aborted the job. 

Program stop error; a program stop 
(zero instruction word) occurred in 
the user's program. 

EXIT.S. processing; an ABORT macro 
with S option initiated a search for 
an EXIT,S. statement. 

Mass storage limit; the limit was 
exceeded. 

Job origin type. 
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TABLE 5-1. SYMBOLIC NAMES WITH ARITHMETIC VALUES (Contd) 



Name 



SYO 
BCO 

EIO 

TXO 

SYS 
NOSB 
SC2 
PNL 



Local 



EM 

FL 

MFL 

MFLL 

TIME 

VER 



Set 







B,R 



U 

o 
o 
o 



o 



Compare 



OT 



OT 



OT 



OT 



SYS 
SYS 



User's Range of Values 



to 7B 



Description 



System job; the job originated from 
the system console. 

Batch job; the job was submitted at 
the central site or from a terminal. 
Job output is sent to the central site. 

Remote batch job; the job was 
submitted from a terminal and out- 
put is sent to a terminal. 

Time-sharing job; a statement was 
submitted from a terminal through 
INTERCOM. 

The host operating system. 

NOS/BE operating system. 

SCOPE 2 operating system. 

Procedure nesting level: 

Job control statements. 

1 1st level procedure. 



50 50th level procedure. 

Current exit mode; user sets on the 
MODE statement. 

Current SCM field length. 

Maximum field length. 

Maximum ECS field length. 

Current time of day (hhmm). 

Version of the operating system. 
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The following symbolic names have true or false values. 
TRUE 1 

T TRUE=1 

FALSE 

F FALSE=0 

SWn SENSE switch, n=l-6 

I The symbolic names Rl, R2, R3, and RIG specify control registers the user can set equal to an expression. 
The expression must consist of symbolic names or integer constants. CCL evaluates the expression as a 
numeric value (for example, if Rl had been set equal to 4, Rl+1 is a valid expression and is evaluated as 5). 

DSC is also a variable, but both the user and CCL control its value. Unless the user specifies the value of 
DSC to be one, DSC remains zero and skipped statements are not printed in the dayfile. When DSC is set to 
one, any skipped statements that follow are printed in the dayfile. Some CCL error processing changes DSC 
I to one, forcing skipped statements to be printed. Skipped statements have a .. prefix. 

The system and the user, can set the values of EF and EFG. As the system encounters errors, CCL changes 
the value of EF to the numeric value of the error type. After processing a procedure (described later in this 
section) CCL sets the value of EFG to the value of EF in the procedure, unless the value of EFG is already 
non-zero. The range of values for EF and EFG are the numeric values of symbolic names TLE, ARE, PPE, 
CPE, MNE, ODE, PSE, ESE, and MSE; their values are system-defined. 

CCL controls the values of OT and SYS. The range of values for OT are the installation-defined, numeric 
values of SYO, BCO, EIO, and TXO. The range of values for SYS consists of the numeric values of NOSB 
and SC2. SC2 and NOSB are defined at installation time. 

If the user-defined numeric value of a symbolic name exceeds the given range of values, CCL truncates the 
value retaining the sign, if signed, without issuing an error message. 

In the CDC CYBER 170 series, EM is a 4-digit octal value, rather than a single-digit octal value. To reduce 
the value of EM to the single-digit set by the MODE statement, use the expression EM.AND.7. To ensure 
correct evaluation, enclose this expression in parentheses. 

CCL FUNCTIONS 

A CCL function is not a statement but must be part of a CCL statement. A CCL function can be used as 
an expression or as part of an expression. 

The FILE and DT functions determine attributes of a file, and the NUM function analyzes character strings. 

CCL functions are described in more detail later in this section. 
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CONDITIONAL STATEMENTS 

The following conditional control statements bracket groups of other control statements to be conditionally 
processed or skipped. 

IFE 

SKIP 

ELSE 

ENDIF 

An IFE, SKIP, or ELSE statement precedes a group of control statements. IFE and ELSE conditionally skip 
or process the statements, and SKIP always causes skipping. An ELSE or ENDIF follows the group. ELSE 
terminates the skipping that IFE initiated or initiates skipping if IFE processed the group of statements. 
ENDIF terminates skipping initiated by an IFE, SKIP, or ELSE statement. 

All conditional statements require a label string parameter. The label string consists of 1 to 10 alphanumeric 
characters, beginning with an alphabetic character. When an IFE, SKIP, or ELSE statement (with a label 
string) initiates skipping, skipping continues until CCL encounters an ELSE or ENDIF statement (ELSE only 
in conjunction with IFE) with a matching label string. 

If no such terminating statement is found while skipping within the job control statement record, CCL skips 
all remaining statements and the job ends. If no such terminating statement is found while skipping within a 
called procedure (covered later in this section), CCL skips all remaining statements in the called procedure, 
issues an abort, and continues processing with the job or calling procedure. 

NOTE 

If the job's time limit is exceeded while CCL is skipping, the job aborts and the 
position of the job control statement file is undefined. CCL stops skipping, and the 
system begins searching for an EXIT statement. Results can be altered. The user 
should increase the time limit and resubmit the job. 

By default, skipped control statements are not written on the dayfile. The SET statement can change this 
default, allowing skipped statements to appear in the dayfile. 



IFE 

The IFE statement conditionally causes the skipping of a group of succeeding control statements. If the 
expression is true, the statements which follow are processed; if false, the statements are skipped until an 
ELSE or ENDIF statement with matching label string is reached. The separator following the expression 
must be a comma. 
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The format of IFE is: 

IFE,exp4s. 

Both parameters are positional and required. 

exp CCL expression. Character strings must be integer constants, symbolic names, or 

CCL functions. 

Is Label string; 1 to 10 alphanumeric characters, beginning with an alphabetic character. 

Example: 

IFE,R1.GT.7JUMP. If the value in control register 1 (Rl) is greater than 7, the comments 

COMMENT.l are processed. If not, CCL skips to the ENDIFJUMP. statement. 

COMMENT.2 Whether the value is greater than 7 or not, the system rewinds FILE1. 

ENDIFJUMP. 
REWIND,FILE1. 

SKIP 

The SKIP control statement causes unconditional skipping of the control statements that follow. Skipping is 
I terminated by an ENDIF statement with matching label string. 

The format of SKIP is: 

SKIPJs. 

The parameter is required. 

Is Label string; 1 to 10 alphanumeric characters, beginning with an alphabetic character. 

Example: 

SKIP,HALT. SKIP initiates skipping, and all the following statements are 

COMMENT.THIS IS SKIPPED. ignored until ENDIF.HALT. 

ELSE,HALT. 

COMMENT.ELSE DOES NOT TERMINATE A SKIP. 

ENDIF.STOP. 

COMMENT.WHY IS THIS SKIPPED? 

ENDIF.HALT. 

COMMENT.ENDIF WITH MATCHING LABEL STRING NEEDED. 

ELSE 

The ELSE statement can either terminate or initiate skipping. It terminates skipping when used in conjunc- 
tion with IFE, provided that the label strings match. If the IFE statement does not initiate skipping (the 
expression within the statement is true), ELSE initiates skipping and is terminated by an ENDIF statement 
with a matching label string. ELSE does not terminate skipping initiated by a SKIP statement or another 
ELSE statement. 
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The format of ELSE is: 
ELSIi,is. 



Tno n«yQmAtAr Jo 




Is 


Label string; 1 t 


Examples: 




IFE,DSC=0,GO. 




COMMENT.TfflS IS NOT SKIPPED 


ELSE.GO. 




COMMENT.THIS IS SKIPPED. 


ENDIF,GO. 





Label string; 1 to 10 alphanumeric characters, beginning with an alphabetic character. 



Since the value of the dayfile skipped statement flag (DSC) 
is by default, the IFE expression is true; no statements are 
skipped. When the ELSE.GO. statement is processed, ELSE 
initiates skipping. The ENDIF, GO. statement terminates 
the skipping. 

IFE,R1 .LT.2,GO, ELSE enhances the capabilities of IFE. IFE processes the 

COMMENT.R1 IS LESS THAN 2. first COMMENT if the expression (R1.LT.2) is true and pro- 

ELSE,GO. cesses the second COMMENT if the expression is false. That 

COMMENT.R1 IS NOT LESS THAN 2. is, ELSE initiates skipping if the expression is true and 
ENDIF.GO. terminates skipping if the expression is false. ENDIF termi- 

nates the skipping initiated by ELSE and is not processed if 
ELSE terminated skipping. 

ENDIF 

The ENDIF statement terminates skipping when used in conjunction with IFE, ELSE, or SKIP statements. If 
not terminating a skip, ENDIF is ignored in terms of processing. It is, however, printed in the dayfile. The 
label strings of the statement that initiates skipping (IFE, ELSE, or SKIP) and the ENDIF statement must 
match. If CCL encounters an ENDIF statement with an unmatched label string, CCL ignores it. 

The format of ENDIF is: 

ENDIF,ls. 

The parameter is required. 

Is Label string; 1 to 10 alphanumeric characters, beginning with an alphabetic character. 

Example: 

IFE,R2.LE.6,LS1. If the value in control register 2 (R2) is less than or equal to 

SET,R2=R2+1. 6, the SET statement increases R2 by 1. If the value of R2 

ENDIF,LS1. is greater than 6, IFE skips the SET statement, and ENDIF 

DISPLAY.R2. terminates that skip. The DISPLAY statement prints the 

value of R2 in the user dayfile, whether the IFE expression is 
true or not. (The SET and DISPLAY statements are covered 
later in this section.) 
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ITERATIVE STATEMENTS 

CCL provides an iterative capacity. The WHILE and ENDW control statements bracket a group of control 
statements and cause it to be processed and reprocessed as long as the WHILE expression is true (can be zero 
times if the expression is never true). When the WHILE expression is no longer true, CCL processes the 
WHILE statement, evaluates the expression as false, and skips all statements until it finds the ENDW statement. 

The WHILE and ENDW statements require a label string parameter. The label string consists of 1 to 10 
alphanumeric characters, beginning with an alphabetic character. It identifies the group of statements to be 
conditionally reprocessed. 

The format of WHILE is: 

WHILE,exp,ls. 

Both parameters are positional and required. The separator following exp must be a comma. 

exp A CCL expression. Character strings must be integer constants, symbolic names, or 

CCL functions. 

Is Label string; 1 to 10 alphanumeric characters, beginning with an alphabetic character. 

The format of ENDW is: 

ENDW4s. 

The parameter is required. 

Is Label string; must match the label string on a WHILE statement. 

The following rules apply to bracketing. 

1. An ENDW statement brackets only that WHILE statement which has a matching label string. 

2. When an expression is false and an ENDW with a matching label string is not found, a WHILE 
statement skips all remaining control statements in the control statement record. 

3. The label string of a WHILE statement should be unique among all WHILE statements within the 
same procedure (procedures are explained later in this section). Label strings of WHILE state- 
ments within the job control statement record should be unique among all WHILE statements in 
the job. 

NOTE 

Duplication of the label string within a procedure or within the job control statement 
section can give unpredictable results. 
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Example: 



SET,Rl=i. The value of control register 1 (Rl) is set to i. The FTN compiler takes 

WHILE,Rl<5,FROG. input from file TOAD and executes different FORTRAN jobs as long as the 

PTW IrTAAn vain A r\f R1 ic Iacc than S (fnur HmAc"\ Far»h rtacc tUrmmh t\\o 1r\r*r\ innraiaaa 

LGO. the value of Rl by 1. 

REWIND.LGO. 

SET,R1=R1+1. 

ENDW.FROG. 



ADDITIONAL CCL STATEMENTS 

The following CCL statements affect the values of symbolic names. The DISPLAY statement, however, only 
prints an evaluated expression in the user dayfile, and that expression need not contain a symbolic name. 



DISPLAY 

The DISPLAY control statement evaluates an expression and sends the result to the user dayfile (but not the 
system dayfile) in both decimal and octal format. The largest decimal value which may be displayed is 
10 digits. If the value is larger than 10 digits, GT followed by 9999999999 is displayed. If the value is 
negative and larger than 10 digits, LT followed by a minus and 9999999999 is displayed. In octal code, 
numbers as large as 20 digits can be displayed. 

The DISPLAY control statement can also evaluate an expression as true or false, and sends a 1 for true and 
a for false to the user dayfile in both decimal and octal format. 

The format of DISPLAY is: 

DISPLAY,exp. 

The parameter is positional and required. 

exp A CCL expression. Character strings must be integer constants, symbolic names, or 

CCL functions. 

Examples: 

1. DISPLAY,lllllllB*i0000B. 

produces in the dayfile 

1227132928 11111110000B 

The expression is evaluated and the result is displayed in the dayfile. 
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2. DISPLAY.SYS. 

produces in the dayfile 

4 4B 

SYS is a symbolic name which had been set to 4. The expression is evaluated and 4 is displayed 
in the dayfile. 

3. DISPLAY,2**37. 

produces in the dayfile 

GT 9999999999 2000000000000B 

The value of this expression requires more than 10 digits in decimal form. However, the correct 
octal value is displayed. 

4. DISPLAY,-2**37. 

produces in the dayfile 

LT -9999999999 -20O0GO0OO000OB 

The value of this expression is negative and requires more than 10 digits in decimal form. How- 
ever, the correct octal value is displayed. 

5. DISPLAY,R1=R2. 

produces in the dayfile 

OB 
or 

1 IB 

If the value in control register 1 does not equal the value in control register 2, the expression is 
evaluated as false, and is displayed in the dayfile. If the values in the two registers are equal, 
the expression is evaluated as true, and 1 is displayed in the dayfile. 

SET 

The SET statement allows the user to set the value of symbolic names. Only a subset of the symbolic names 
known to CCL may be set. This subset consists of the control registers (Rl, R2, R3, and RIG), the error 
flags (EF and EFG), and the dayfile skipped control statement flag (DSC). The control registers are 18-bit 
signed quantities, and the error flags are 6-bit unsigned quantitites. If the value of the expression is too large, 
it is truncated (retaining the sign if signed), and no error message is issued. DSC is a single bit, which is set 
to one if the expression value is non-zero. 
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The format of SET is: 
SET,sym=exp. 



TU« „„_~~„*„,o „»a nn cif!nti<i1 on/1 romiirilrl 



sym 
exp 



Symbolic name to be set. 

A CCL expression. Character strings must be integer constants, symbolic names, or 
CCL functions. 



Examples: 
1. 



Input 

SET,R3=4. 
DISPLAY.R3. 
SET,R3=R3+1. 
DISPLAY,R3. 



Job Dayfile 

SET,R3=4. 
DISPLAY.R3. 

4 4B 
SET,R3=R3+1. 
DISPLAY,R3. 

5 5B 



The value of control register 3 (R3) is set to 4 and is displayed in the dayfile. The second SET 
statement increments the value of R3 by 1, and the new value is displayed in the dayfile. 



Input 

SET,R1=0. 
IFE,EF=CPE,SKIP. 
SET,R1=1. 
ENDIF,SKIP. 
DISPLAY.R1 . 



Job Dayfile (one of the following) 



SET,R1=0. 
IFE,EF=CPE,SKIP. 
SET,R1=1 
ENDIF,SKIP. 

AV D1 

1 IB 



SET,R1=0. 
IFE,EF=CPE,SKIP. 
ENDIF,SKTP. 
DISPLAY.R1. 
OB 



The value of control register 1 (rl) is set to 0. IFE compares the value of the error flag (EF) to 
the value indicating a CPU abort error (CPE). If they are equal, the value of control register 1 is 
set to 1 and is displayed in the dayfile. The ENDIF statement is not processed but is printed in 
the dayfile. If the values of EF and CPE are not equal, the second SET statement is slapped. 
ENDIF terminates skipping, and the value of Rl is displayed as 0. 



Input 

SKIP.HERE. 

COMMENT.NO. 1 

ENDIF,HERE. 

COMMENT.N0.2 

SET,DSC=1. 

IFE,DSC=0,THERE. 

COMMENT.N0.3 

ENDIF.THERE. 



Job Dayfile 

SKIP.HERE. 
ENDIF.HERE. 

N0.2 
SET,DSC=1. 
IFE,DSC=0,THERE. 
..C0MMENT.N0.3 
ENDIF,THERE. 
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COMMENT.NO.l is skipped, and is not printed in the dayfile. ENDIF terminates skipping; 
COMMENT.N0.2 is processed, and DSC is set to 1. The IFE expression is false; therefore, 
CCL skips to ENDIF.THERE. but prints COMMENT.NO.3 in the dayfile with a .. prefix. That 
skipped statement is printed because DSC was set to 1. 

FUNCTIONS 

The following CCL functions determine attributes of a file or analyze character strings. 
FILE Determines the status of a file. 

DT Determines the device type of a file. 

NUM Determines whether a parameter has a numeric value. 

FILE 

The FILE function determines the status of a file. Status includes file type, location, and accessibility. Each 
symbolic name listed in the expression is evaluated as true (1) or false (0). FILE then applies the operators 
in the expression to these values. For example, FILE(ifn, PH.AND.RD) translates to FILE(lfnJPH).AND.FlLE 
(lfn.RD). The result of a FILE function is a number, not necessarily 1 or if arithmetic operators are used. 

The format of the FILE function is: 

FILE0fn,exp) 

The parameters are positional and required. 

lfn Logical name of the file to be analyzed. 

ex P An expression consisting of operators and one or more FILE symbolic names. 

The FILE function is used as an expression or part of an expression in a CCL statement. The expression 
within a FILE function cannot include the NUM function or another FILE function. 

The FILE function must use exactly the same combination of separators and terminators shown in the format. 
If there is any deviation, CCL considers it an error and aborts the job. 

Only the DT function or the following symbolic names can be used within the expression of a FILE function. 
Any other symbolic name or character string within the expression is unknown or an implicit DT function 
(see DT later in this section). 
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FILE TYPE 



IN 
LB 



OP 
PF 
PH 
PR 



INPUT file 
Labeled file 



local.) 
Opened file 

Punch file 
Print file 



FILE LOCATION 

AS 

BOI 
EOF 

EOI 

MS 
TP 
TT 



Attached to the user's job (that is, NOS/BE recognizes the lfn of the file; the file 

exists) 

Positioned at the beginning-of-information (only valid for mass storage) 

The last operation moved forward and encountered an EOP; the file is now 

positioned after that EOP 

The last operation moved forward and encountered an EOI; the file is now 

positioned at that EOI 

Mass storage 

Magnetic tape 

Connected to a terminal 



FILE ACCESSIBILITY 

EN 
MD 
RD 
WR 

Examples: 



Extend permission 

Modify permission 

Read permission 

Write permission (modify permission, extend permission, or both) 



1 , SET,R1 =FILE<WHOFILE,LO .AND.WR). 
WHILE.Rl.LT.l.GO. 
DISPLAY.R1. 
SET,R1=R1+1. 
ENDW.GO. 
DISPLAY,R1. 

If WHOFILE is a temporary file with write permission, Rl is set to 1, the WHILE expression is 
false, and control skips to the ENDW statement. The value of Rl (1) is displayed in the dayfile. 
If WHOFILE is not temporary or does not have write permission, Rl is set to 0. The WHILE 
expression is true, and the DISPLAY and SET statements are processed. The loop ends when Rl 
is set to 1 and this value is displayed in the dayfile. 
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IFE,FILE(MYFILE,BOI),MOVE. 

COPY,MYFILE,OUTPUT. 

ELSE.MOVE. 

REWIND.MYFILE. 

COPY,MYFILE,OUTPUT. 

ENDIF.MOVE. 

MYFILE is an attached permanent file with all permissions granted. If MYFILE is at the 
beginning-of-information, it is copied to output. The ELSE statement initiates skipping that is 
terminated by ENDIF. If MYFILE is not at the beginning-of-information, ELSE stops the IFE 
SKIPPING; MYFILE is then rewound and copied. The ENDIF statement is ignored. 



DT 



The DT function determines information about the device type on which a file resides. DT may be used 
only within the expression of a FILE function. The value of the DT function is true if the 2-character 
mnemonic (dt) matches the 2-character device type mnemonic of the file. The mnemonic must be enclosed in 
| parentheses. 

The format of the DT function is: 

FILE(lfn,...DT(dt)...) 

expression 

The parameters are positional and required. 

lfn Logical name of file to analyzed. 

dt A 2-character mnemonic indicating a device type. An entire FILE expression may 

consist of dt. 

See Device Types, section 6 for the valid device type mnemonics. 

CCL assumes that any 2-character symbol within a FILE function that is not a FILE function symbolic name 
is an implicit DT function (for example, if MT is found, it is treated as DT(MT) and is false unless the 
device type happens to be MT). 

Examples: 

In the following examples, file FRANK resides on a 7-track magnetic tape. 

1. DISPLAY,FILE(FRANK,DT(MT)). 

yields 

1 IB 

It is true that FRANK is on a 7-track tape; therefore, the value 1 is displayed. 
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IFE,FILE(FRANK,TP.AND.DT(MT)),LS1 . 

COPY,FRANK,OUTPUT. 

ENDIF,LS1. 

UNLOAD.FRANK. 

FRANK is on a 7-track magnetic tape; therefore, it is copied to output and then unloaded. If the 
DT function were false or FRANK were not on magnetic tape, FRANK would be unloaded. 



NUM 

The NUM function determines whether a character string is numeric or not. It evaluates the character string as 
true (1) if it is numeric or false (0) if it is non-numeric. NUM may be used as an expression or as part of 
an expression in a CCL statement. The NUM function may be more useful within a procedure. (An 
example of the NUM function used within a procedure can be found in the discussion of procedures later in 
this section.) CCL considers any deviation from the given format an error and aborts the job. 

The format of the NUM function is: 

NUM(c) 

The parameter is required. 

c A character string; 1 to 40 characters. Special characters must be $-delimited. 

Example: 

IFE,NUM(FTNFILE)=0,GO. The character string, FTNFILE, is non-numeric; therefore, the 

FTN,I=FTNFILE. IFE expression is true. The FORTRAN job is compiled and 

LGO. executed, and the comment is processed. 

ENDIF.GO. 

COMMENT.DO SOMETHING ELSE. 

PROCEDURES 

A procedure is a group of control statements (including CCL statements) separate from the job control state- 
ment record, which can be called by a job. Calling a procedure provides a simplified method of processing 
that group of control statements. A procedure can be called by a job repeatedly, by another procedure, or 
by itself. 

The discussion of procedures is broken into the following four parts. 

Procedure residence. Describes the various ways a procedure can be stored. 

Procedure structure. Explains the composition of a procedure; it contains the following subsections. 

Procedure header statement Explains the CCL statement required of all procedures. 

Procedure body Discusses the special capabilities of all statements within a procedure 

other than the procedure header statement. 
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Procedure call Describes how a procedure is inserted into the job control statement stream; it 

and return contains the following subsections. 

Procedure call Describes how a procedure can be called by its name or by a BEGIN 

statement. These two types of calling statements are referred to as the pro- 
cedure call statement. This subsection explains ways the parameters on a 
procedure call statement can be processed and how these parameters can be 
substituted into the procedure body. 



Procedure return 



Procedure 
commands 

.DATA 

.EOR 

.EOF 



Explains how processing returns from a procedure to the calling job or 
procedure. This is done automatically by CCL or by the user with a 
REVERT statement. This subsection also indicates how the values of various 
symbolic names are affected by a return from a procedure. 



Describes the following special CCL commands which may be used within a procedure. 

Permits data to be stored within a procedure. 

Writes an EOR onto the data file. 

Writes an EOP onto the data file. 

Enables the user to include in a procedure comments that will not be printed in 
the user day file. 



PROCEDURE RESIDENCE 

A procedure is stored as a record (system-logical-record) on a file or library. When CCL reads the procedure, 
it leaves the file positioned at the beginning of the record following the procedure. Hence, data can be 
stored after the procedure to be processed with the procedure. A procedure can have the following relation- 
ships to the file on which it is stored. 

One procedure can occupy the entire file (one record). 

Several procedures may reside on the same file in records stored in a sequential manner. When the 
procedure is specified by name, the file is searched for this procedure in a circular fashion. CCL auto- 
matically rewinds the file and continues searching if an EOI is reached before the procedure is found. 
If the entire file is searched and the procedure is not found, CCL aborts the job. 

Processing a procedure does not alter the contents of the file from which it was obtained. 

A file containing procedures can be a permanent file. 

A procedure can be stored in rotating mass storage if the file containing it is sequential. 

A procedure can be stored on a library. 

A procedure can reside on the input file of the calling job; however, CCL does not rewind the input 
file if an EOI is encountered before the procedure is found. 
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To save a procedure through INTERCOM program text editor (EDITOR), use the NOSEQ parameter on the 
SAVE command. If the NOSEQ parameter is omitted, the EDITOR line numbers are not removed and 
interfere with CCL processing. 

PROCEDURE STRUCTURE 

A procedure consists of a procedure header statement and a procedure body. The procedure must be named 
and begin with the header statement. The body contains all statements between the header statement and an 

t-iiu ui i&tuiu. J.U& uvuj iiiusi ^uiiLaui ai icaai vnc k/uuuui auiLGiiidiL. rui LUiiuui AL<iL5iiit;iiL3 die icg<i± 

within a procedure, including CCL statements. The body may also include special procedure commands and 
data. 



PROCEDURE HEADER STATEMENT 

A procedure starts with a procedure header statement, .PROC, which declares the name of the procedure and 
identifies any formal keywords and their default values. Unless it contains an error, the header statement is 
not printed in the day file. The characters PROC must be preceded by a period and followed by a comma. 
The header statement must be terminated by a period. The separator between parameters must be a comma. 
A header statement may continue over more than one card or line of input, provided that a separator is the 
last character on each card or line. A procedure name can be 1 to 7 alphanumeric characters. It can begin 
with or consist entirely of numeric characters, unless it is to be called by a call-by-name statement. In that 
case, the procedure name must begin with a letter. 

The format of the procedure header statement is: 

.PROC,pname,p 1 p 2 ,....,p n . 

The pname parameter is positional and required; parameters p- are optional. 

pname The name of the procedure (can be 1 to 7 alphanumeric characters), pname cannot 

be BEGIN. 

Pj A user-created parameter in one of the following forms. 

fk Formal keyword 

fk=defaultl Formal keyword with default 

fk=defaultl/default2 Formal keyword with two defaults 

fk= Formal keyword with null default 

fk is its own defaultl value if a default value is not specified. If two defaults are specified, the user can 
select only one on the procedure call statements. The form fk= can be used to specify a null default. The 
formal keywords must be 1 to 10 alphanumeric characters; formal keywords beginning with or consisting of 
numerics are legal. The defaults can be 1 to 40 alphanumeric characters. The values defaultl and default2 
can be S-delimited character strings. The number of parameters is limited to an installation-defined value. 
The released default value is 50. 

Formal keywords appear in the procedure body and can be replaced by their default values during substitu- 
tion. Substitution occurs when the procedure is called, replacing formal keywords with default values or 
values from the call statement. 
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A formal keyword can be $-delimited in any pj form; however, it can contain only alphanumeric characters. 
If it contains special characters, substitution does not occur. 

There are two special defaults which can be used in the procedure header statement. These defaults are 
=FILE and =DATA (# FILE and # DATA in ASCII). CCL supplies the value of these defaults. They can 
be overridden just as any other default of a formal parameter can be overridden by specification on a proce- 
dure call statement. 

When fk= =FILE is specified in the .PROC statement, CCL reads the record after the procedure. If the pro- 
cedure resides on a library, CCL changes the =FILE to =LIB during substitution. The dayfile shows the =LIB 
substitution. If the file is not on a library, the dayfile shows the file name instead of =FILE. 

When fk= =DATA is specified, CCL creates a default temporary file to which a .DATA command writes data 
statements. (The .DATA command is explained later in this section.) 

Examples: 

1. .PROC,ZZZ,Pl==FILE. 
FTN,I=P1. 

After procedure ZZZ is called, the FTN compiler looks for input from the file containing proce- 
dure ZZZ. The record following ZZZ is read. 

2. .PROC,SNORE,P2==DATA. 
FTN,I=P2. 

After procedure SNORE is called, the FTN compiler searches for input from the file generated by 
the .DATA command. 



PROCEDURE BODY 

The procedure body consists of all statements which follow the procedure header statement. The procedure 
body can contain any control statement including CCL statements, as well as calls to other procedures. 

The procedure body can use any of the formal keywords defined on the procedure header statement. When 
a procedure is called, CCL scans the statements of the procedure body before processing. The values specified 
by the parameters in the procedure call statement are substituted for the occurrence of the formal keywords 
in each statement of the procedure body. If a formal keyword is not indicated on the call statement, defaultl 
from the header statement replaces occurrences of the formal keyword. A parameter on the call statement 
can indicate default2. (Substitution is explained later in this section.) 

PROCEDURE CALL AND RETURN 

A procedure is stored outside the job control statement record and CCL logically inserts it into the job 
control stream when the job calls it. A call statement in the job calls the procedure. After the final 
processed control statement of the procedure, a CCL," or user-issued REVERT statement continues processing 
with the job control statement after the call statement (figure 5-1). 



fCCL issues a REVERT statement if the user does not supply one within a procedure. 
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Figure 5-1. Calling a Procedure from a Job 



If called by a call statement in another procedure, the procedure is logically inserted into that procedure's 
control statement stream. After the final processed control statement of the procedure, a CCL,t or user- 
issued REVERT statement continues processing in the calling procedure with the control statement after the 
call statement (figure 5-2). 
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Figure 5-2. Calling a Procedure from Another Procedure 



tCCL issues a REVERT statement if the user does not supply one within a procedure. 
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PROCEDURE CALL 

Procedures may be called (caused to be processed) by a procedure call statement in a job or procedure. The 
call statement is either a BEGIN or call-by-name statement. The term call statement refers to both forms of 
the statement. The BEGIN statement can call a procedure on a permanent file, and the call-by-name state- 
ment can call a procedure on a library. Both statements can call a procedure on a local file. 

The syntax of the call statement is similar to that of other control statements. The call statement must be 
terminated by a period or a right parenthesis. The separator following each parameter must be a comma. 
The call statement can continue over more than one card or line or input if a separator is the last character 
on each card or line. 

BEGIN STATEMENT 

The format of BEGIN is: 

BEGIN.pname.pfile^j^, p n . 

The pname and pfile parameters are positional. When the user does not specify a parameter, CCL 
assumes a default value. Parameters p| are optional. 

pname The procedure name as declared on the header statement. Default is the next 

procedure on file pfile. If the default is used and pfile is at end of information, 
CCL rewinds pfile and calls the first procedure. 

P^ The name of the file where procedure pname is located. Default is an installation- 

defined file name. 

Pi A parameter having one of the following forms. 

v A value; can be 1 to 40 alphanumeric characters. If any charac- 

ters except a slash (/) or a leading minus are nonalphanumeric, 
v must be a literal (for example, A/B/C/ is a 5-character specifi- 
cation for a formal keyword). 

fk A formal keyword; fk is the same keyword used in the procedure 

header statement. 

fk=v Value v is substituted for the formal keyword fk in the proce- 

dure header statement. 

fk= A null string is substituted for the formal keyword fk in the 

procedure header statement. 

To call a procedure pname on a file pfile, CCL searches for a local file pfile. If no local pfile is found, CCL 
attempts to attach permanent file pfile with user id PUBLIC. Once pfile is located, CCL searches for proce- 
dure pname. If pfile or pname is not found, the job aborts. Parameters correspond to formal keywords 
declared on the header statement. If the user needs only default values, the BEGIN statement might not 
have any parameters. The separator following the verh BF.OTN mi.m h? 3 comma or a left parenthesis. 
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CALL-BY-NAME-STATEMENT 
The format of call-by-name is: 

pname,p 1 ,p2 ,p n . 

The pname parameter must be specified; parameters pj are optional. 

pname The procedure name as declared on the header statement. There is no default. 

Pj A parameter having one of the following forms (see BEGIN statement for further 

explanation). 

v A value; 1 to 40 characters. 

fk A formal keyword. 

fk=v Value v is substituted for formal keyword fk. 

fk= Null string is substituted for formal keyword fk. 

To call a procedure by name, CCL searches for a local file pname. If file pname is found, CCL looks for 
procedure pname on it. If no local file pname is found, CCL searches the currently defined library set for 
procedure pname. If procedure pname is not found, the job aborts. Parameters correspond to formal key- 
words declared on the header statement. If the user needs only default values, the call-by-name statement 
might not have any parameters. The separator following pname must be a comma or a left parenthesis. 

SUBSTITUTION 

When CCL calls a procedure, it searches the procedure body for any formal keywords declared on the header 
statement. Substitution occurs when CCL replaces formal keywords in the procedure body with default 
values from the header statement or values from the call statement. The parameters on the call statement 
determine which values replace the formal keywords. After substitution, the control statement generated by 
CCL can exceed 80 characters. CCL generates a continuation control statement by using the last valid 
separator through column 80 as the end of the previous control card and creating a new control card con- 
taining the remaining parameters. If a continued statement of the type being processed is not allowed 
(for example, COMMENT.), a control statement error is generated when execution is attempted. 

The two modes in which CCL processes parameters on the call statement are positional and equivalence. In 
positional mode there is a one-to-one correspondence between call statement keywords and keywords on the 
header statement. The permissible call statement parameters are a value v or null. The values in the call 
statement are substituted for formal keywords from the procedure header statement, replacing first keyword 
with first value, second keyword with second value, and so on (that is, wherever the first keyword from the 
header statement appears in the procedure body, it is replaced by the first value listed on the call statement 
and so forth). A null parameter indicates the first default from the header statement, not a null string. A 
null string can be specified only in equivalence mode by fk=. If the user places an fk parameter in 
positional mode, CCL treates it as a v parameter. 
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Example: 

Procedure on File MYFILE 



Calls and Expansion 



.PROC,EXAMPLE,I,J,K=XY. 

REWINDJ,J,K. BEGIN,EXAMPLE,MYFILE. 

yields 
REWIND,U,XY. 

BEGIN,EXAMPLE,MYFILE,B„Z. 

yields 
REWIND,B,J,Z. 



Explanation 



All defaults from the header statement 
are used. 



B replaces I, and Z replaces K in the 
procedure body. The empty param- 
eter indicates defaultl for J. 



In equivalence mode, the parameter forms are fk, fk=v, and fk=. Their positions on the call statement are 
irrelevant. If a formal keyword with two defaults was specified on the procedure header statement, the user 
can select the formal keyword's second default with an fk parameter. fk=v replaces formal keyword fk with 
value v. fk= substitutes a null string for formal keyword fk. If a parameter is not specified on the call 
statement for a formal keyword with either one of two defaults, the first default is substituted. A null 
parameter is ignored in equivalence mode. If the user indicates more than one value for a formal keyword 
on the call statement, the last specification is used. A v parameter in equivalence mode is an error. CCL 
issues an error message and aborts the job, 

fk=v always specifies fk to have the value v. If v is null (fk= ), appearances of fk in the procedure body are 
replaced by a null string. fk=sym+, fk=sym+D, and fk=sym+B cause the numeric value of the symbolic name 
sym to be converted to a decimal (fk=sym+,fk=sym+D) or octal (fk=sym+B) display code value. This value 
replaces fk in the procedure body, sym can be numeric (for example, J=99+B). These forms are not valid 
on the header statement. 



Examples: 

Procedure on File MYFILE 

.PROC,EXAMPLE,U=A/B. 
COPY,I,J. 



Calls and Expansion 



BEGIN,EXAMPLE,MYFILE. 

yields 
COPY,I,A. 



Explanation 



J is replaced by its first default; 
I is replaced by its first and only 
default. 



.PROC,VALUE,TS. 

ATTACH,BLUE,RED,ID=KK, 

CY-TS. 



BEGIN,EXAMPLE,MYFILE J I=F,J. F replaces I; the J parameter indi- 

yields cates second default for J. 
COPY,F,B. 

BEGIN,EXAMPLE,MYFILE,I=J=Z. ^substitutes a null string for I; 

yields Z replaces J. 
COPY„Z. 

SET,R1=910. The decimal numeric value of the 

BEGIN,VALUE,MYFILE,TS=R1+. symbolic name Rl replaces TS. 

yields 
ATTACH,BLUE,RED,ID=KK,CY=91 0. 
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The processing of parameters on the call statement is initially in positional mode. The switch to equivalence 
mode occurs as follows: 

Equivalence mode is entered at the first occurrence of an fk=v or fk= parameter within the call | 

statement. 

If the procedure header statement contains a formal keyword with a second default, equivalence mode 

10 til td &u. ai ivi it iJaianiv n-i a na. v ^ uvwii t/i uvmjvu. ii ao ulv liuiuuw ui iui uuu ftvv nrui u.a lll uj.v uCauvi 

statement up to, but not including, the first formal keyword with a second default. 

Once processing switches from positional mode to equivalence mode, it remains in equivalence mode for all I 

remaining parameters on the call statement. It is impossible to return to positional mode. ■ 

Example: 

Procedure on File AFILE Call and Expansion Explanation 

.PROC,SHOWJ,J=A,K=X,L=Y/Z. 
RETURN,I,J,K,L. 

BEGIN,SHOW,AFILE,R,S,T,L. L=Y/Z is in fourth position, setting 

yields n=3. R, S, and T are in positional 

RETURN,R,S,T,Z. mode; L is in equivalence mode, 

selecting the second default Z. 

The right arrow, —(underline character in ASCII), is reserved by CCL for use as a linking character. It can 
be used within the procedure body to separate temporarily two character strings when they do not have a | 

standard separator between them. After processing and substitution, any right arrows are removed, and the 
character strings are joined. 

An equivalence symbol, = (# in ASCII), inhibits substitution of a character string if it immediately precedes 
the string. The character string is not compared to the list of formal keywords, substitution is inhibited, and 
the equivalence symbol is removed. If a separator immediately follows an equivalence symbol, CCL accepts 
the separator without examination. Consecutive equivalence symbols yield one equivalence symbol, and 
substitution occurs if a formal keyword follows. An equivalence symbol followed by a right arrow produces 
one right arrow, and the character string that follows is substituted if it is a formal keyword. When two 
character strings are separated by a right arrow followed by an equivalence symbol, CCL joins the character 
strings without substitution of the second string. 



Examples: 



.PROC,INfflBIT,I=BB. 

FTN,=I=I. 

COMMENT.^ QUIT,QU~I-*T. QU*=I— T. 

Substitution yields: 

FTN,I=BB. 

COMMENT.I QUIT, QUBBT, QUIT. 

Only the single character I is recognized as a formal keyword; therefore, character string QUIT is 
not affected by substitution. When I is separated by right arrows, QU, I, and T become separate 
character strings. 
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2. .PROC,SUB,I=BB. 
FTN,I=I. 
COMMENTS =1 QUs^I— T, QU=— IT. 

Substitution yields: 

FTN,BB=BB. 

COMMENT.sBB QU—BBT,QU— IT. 

Without the equivalence symbol before I, the FTN parameter is meaningless after substitution. 

The rules of substitution in a procedure body are as follows: 

Each line of the procedure body is divided into character strings and separators. If a character string is 
identical to a formal keyword, substitution occurs unless inhibited by an equivalence symbol. 

All nonalphanumeric characters are separators including blanks and dollar signs that bracket literals. 

A right arrow is deleted, linking preceding and following strings. 

One equivalence symbol is deleted, inhibiting substitution of the character string it precedes. 

CCL does not remove blanks. 

Normally, a $-delimited 0iteral) value v in a call statement is evaluated before substitution. Outer dollar signs 
are stripped off, and inner double dollar signs are reduced to a single dollar sign. However, if the related 
formal keyword in the procedure header statement is also $-delimited, evaluation of the literal value does not 
occur. Instead, CCL substitutes the literal with dollar signs intact. That is, substituting a literal value for a 
literal formal keyword produces a value that is delimited by double dollar signs. 

PROCEDURE CALLS AND SUBSTITUTION EXAMPLES 

Procedure Calls and Expansion Explanation 

.PROC,EXAMPLE,I,J,K=XY. Procedure EXAMPLE is on file 

REWIND,I,A,J,K. MYFILE. A is always rewound since 

it is not a formal keyword. 

BEGIN,EXAMPLE,MYFILE,R,T,S. Parameter processing remains in 

yields positional mode. 

REWIND,R,A,T,S. 

BEGIN,EXAMPLE,MYFILE,K=YY. Equivalence mode is entered at once 

yields with K=YY. I and J assume their 

REWIND,I,A,J,YY. defaults. 

BEGIN,EXAMPLE,MYFILE.R. Equivalence mode is entered with 

K=F,J=B. K=F. 

yields 
REWIND,R,A,B,F. 
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Procedure 



Calls and Expansion 



Explanation 



.PROC,ITEM,LGO,N=l /' 
10000,L=OUTPUT/LIST. 

TTCUI7C T r.Ci =T =T =M=M 



BEGIN,ITEM„LFN. 

u islds 
ITEMIZE,LFN,L=OUTPUT,N=l . 



Procedure ITEM is on a local file 
with the CCL default file name. 



= before L and N in ITEMIZE 
inhibits substitution of these two 
characters. First defaults apply to L 
and N. The order of formal key- 
words on the header statement does 
not affect the order of substituted 
keywords on ITEMIZE. 



BEGIN,ITEM„L=B. 

yields 
ITEMIZE,LGO,L=B,N=l. 



B is substituted for L in equivalence 
mode while LGO and N assume first 
defaults. 



BEGIN,ITEM„L,L. 

yields 
ITEMIZE,L,L=LIST,N=1. 



The first L on the BEGIN statement 
is in positional mode. Specifying 
the second L in equivalence mode 
indicates L's second default. 



BEGIN,ITEM„L,5. 
Fatal error 



The 5 is in equivalence mode and 
does not match any formal keyword. 



.PROC,TEST,LFN,PAR=D. 
COMPASS,I=LFN,PAR. 



BEGIN,TEST,NOW,FILEl . 
yields 

nrtlinAOO T-CTTC1 Fk 

\^\jp/iif AOk>,i— VLM-tLJi ,iy. 



Procedure TEST is on file NOW. 



FILE1 is substituted for LFN in 
positional mode; PAR assumes its 



BEGIN,TEST,NOW,FILE2, 
$L=LIST,D$ 

yields 
COMPASS ,I=FILE2,L=LIST,D. 



In positional mode, FILE2 is sub- 
stituted for LFN, and L=LIST,D 
is substituted for PAR. The PAR 
substitution creates an additional 
COMPASS parameter. 



CALL BY NAME EXAMPLE: 
Procedure 



Calls and Expansion 



Explanation 



.PROC,GERTIE,A ) B,C,M=MODE, 

BO=R/S. 

COPYL,A,B,C. M IS BO 



GERTIE(,„MO) 

yields 
COPYL,A,B,C. MO IS R 



Procedure GERTIE is on the cur- 
rently defined library set. 

Processing remains in positional mode 
with the empty parameters indicating 
first defaults and MO replacing M. 
Since the call statement does not 
specify a value for BO, its first 
default (R) is used. 
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Procedure 



Calls and Expansion 



Explanation 



GERTIE,R,C=NEW,BO. 

yields 
COPYL,R,B,NEW.MODE IS S 



The first parameter is positional 
mode, but equivalence mode starts 
withC=NEW. Equivalence mode 
causes BO to apply to BO, not M. 



NUM FUNCTION SAMPLE PROCEDURE: 

In the following example, the procedure SHOW is on file SAMPLE. The call statements indicate the proce- 
dure name and the file the procedure is on. 



Procedure 

.PROC,SHOW,IN=FTNFlLE. 

IFE,NUM(IN)=0,LS. 

FTN,I=IN. 

LGO. 

ENDIF,LS. 

COMMENT.DO SOMETHING ELSE 



Calls and Expansion 



Explanation 



BEGIN,SHOW,SAMPLE. 

yields 
IFE,NUM(FTNFILE)=0,LS. 
FTN,I=FTNFILE. 
LGO. 

ENDIF,LS. 
COMMENT.DO SOMETHING ELSE 



BEGIN,SHOW,SAMPLE,8. 

yields 
IFE,NUM(8)=0,LS. 
FTN,I=8. 
LGO. 

ENDIF.LS. 
COMMENT.DO SOMETHING ELSE 



No parameters were specified 
on the call statement; therefore, 
IN assumes its first default. 
The NUM function evaluates 
the substituted formal keyword 
as non-numeric, making the 
IFE expression true. The 
FORTRAN job is compiled 
and executed and the comment 
is processed. 

The value 8 on the call state- 
ment is in positional mode 
replacing IN. The NUM 
function evaluates 8 as a 
numeric, making the IFE 
expression false. The FTN and 
LGO statements are skipped, 
and the comment is processed. 



PROCEDURE RETURN 

A REVERT control statement causes processing to return to the calling job or procedure at the statement 
immediately following the procedure call statement. 
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The format of REVERT is: 

REVERT. Processing returns to the calling job or procedure. 



REVERT,ABORT. Same as REVERT., except that after processing returns, CCL issues an abort 

iuStCau OT a nOrmai cXit. 

A REVERT statement can appear anywhere within a procedure. REVERT is commonly used in conjunction 
with a conditional statement to cause premature return to the calling job or procedure. The user can place 
REVERT at the end of a procedure, but this is unnecessary because CCL provides an implicit REVERT 
sequence. The CCL following each statement identifies it as generated by CCL. 

REVERT.CCL This is the REVERT sequence CCL provides after the last 

EXIT.S.CCL processed statement of a procedure. If the last statement did 

REVERT,ABORT.CCL not produce a fatal error, CCL processes the REVERT, state- 

ment. If the last statement did produce a fatal error, the 
first statement in this sequence is skipped. CCL provides an 
EXIT,S. statement to terminate skipping, and processes the 
REVERT .ABORT, statement. 

The user may wish to use an EXIT control statement to create a REVERT sequence. The EXIT statement 
produces the same results whether it is in a procedure or the job file; it does not cause a return to the 
calling job or procedure. EXIT should be used with caution because it can terminate the job. 

Example: 

LGO. If a fatal error occurs during the processing of the LGO. 

REVERT. statement, the system skips to the EXIT,S. statement. CM is 

EXIT,S. dumped and CCL processes the REVERT,ABORT. statement. 

DMP. If no fatal error occurs during the processing of the LGO. 

REVERT,ABORT. statement, CCL processes the REVERT, statement. 

During a REVERT, CCL might change the value of symbolic names Rl, R2, R3, EF, EFG, and DSC. Their 
values can be set by the user before BEGIN and REVERT. 

The values of control registers Rl, R2, and R3, the error flag (EF), and the dayfile skipped control statement 
flag (DSC) are saved at the time of a procedure call and restored by a REVERT. If the value of control 
register RIG is changed within a procedure, REVERT does not restore it to the value before the procedure 
call. 

Example: 

!. The user sets DSC to one before a procedure is called. 

2. Within the procedure, the user sets DSC to zero. 

3. When CCL processes a REVERT, DSC is again one. 
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When the global error flag (EFG) is zero, it is set to the value of EF during a REVERT. REVERT restores 
EF to its value at the time of the procedure call (zero). This means the value of EF in the procedure may 
be passed back to EFG in the control statement sequence that calls the procedure. The value of EF is not 
transferred to EFG unless the values of EF and EFG are zero before the procedure is called. 

The following example shows input from the job file and a procedure and the resulting dayfile output. 



Input 



Dayfile 



Comments 



Job file 



Procedure 



SET,EF=0. 

SET,EFG=0. 

BEGINJEST. 

DISPLAY.EF. 

DISPLAY.EFG. 



/ .PROCJEST. 

1SET,EF=1. 
DISPLAY.EF. 
DISPLAY.EFG. 



SET,EF=0. 

SET,EFG=0. 

BEGINJEST. 

SET,EF=1. 

DISPLAY.EF. 

1 IB 
DISPLAY.EFG. 

0B 
REVERT.CCL 
DISPLAY.EF. 

OB 
DISPLAY.EFG. 

1 IB 



EF and EFG are set to 0. 

EF is changed to 1. 

This portion of the dayfile is from the procedure TEST. 

The value of EF is restored to 0. 

The former value of EF is passed back to the job in EFG. 



PROCEDURE COMMANDS 



Procedure commands are similar to directives and can be included in the body of a procedure to control the 
processing of data within the procedure. As CCL processes each statement of a procedure body, it makes any 
necessary substitutions and determines if the resultant statement is a procedure command. The commands 
have a fixed format with a period in column 1 and the command name beginning in column 2; the commands 
do not have a terminator. All command requirements must be met exactly; if not met, a statement is 
assumed not to be a command. 



.DATA 

A .DATA command separates control statements of the procedure from subsequent data statements. It allows 
the same parameter substitution occurring in the control statements to occur within the data statements and 
.DATA command. All statements following the .DATA command are written to a file when the procedure is 
called. Comments cannot follow the command name or the parameter (if specified); the remainder of the 
command must be blank. 

The format of the .DATA command is: 

.DATA,lfn 

The parameter is optional. 

Ifn Writes data to file lfn; if not specified, CCL writes data to a default file name. 
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The .DATA command causes CCL to generate a temporary file and supply a default name unless a file name 
is specified by the user. Statements within the procedure can reference the default file via the special default 
=DATA in the procedure header statement, if the file already exists, CCL returns it and creates a new file. 
Hence, the .DATA command cannot be used to add data to an existing file. After the data is written, the 
m- :. — _-i if *u~ ..,.„, „„„,.;fi^ o filo noma nn tVio HATA cnmmanH thp =DATA default will not 
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reference that file name. A user-specified file name must either be declared on the header statement for 
substitution or used directly in the procedure body. 

Data associated with a procedure can also be contained in the records following it. The user can reference 
this data with the =FILE default in the procedure header statement. The procedure file is always positioned 
at the beginning of the record following the called procedure. When procedure data is not contained in the 
procedure, substitution of parameters does not occur within the data. 

Examples: 

In the following examples, both procedures and their data are on file SLEEP. 

Procedure After Substitution 



1. .PROC,SNORE,P1==DATA,X=Y. 
FTN,I=P1. 

COMMENT.IF X IS TRUEJT IS 
JUNE. 



BEGIN,SNORE,SLEEP. 
FTN,1=ZZCCLAA. 
COMMENT.IF Y IS TRUEJT IS 

JUNE. 



.DATA 
PROGRAM X(INPUT,OUTPUT) 



.DATA 
PROGRAM Y(INPUT,OUTPUT) 



All input after the .DATA command has been written onto the default temporary file, ZZCCLAA. The 
=DATA default tells the FTN compiler to search for input from ZZCCLAA. Substitution occurs in the 
FORTRAN program, as well as in procedure SNORE. 



.PROC,ZZZ,P2==FILE,X=Y. 
FTN,I=P2. 

COMMENT.IF X IS TRUE, IT IS 
JUNE. 



BEGIN,ZZZ,SLEEP. 

FTN,I=SLEEP. 

COMMENT.IF Y IS TRUEJT IS 

JUNE. 



7/8/9 
PROGRAM X(INPUT,OUTPUT) 



7/8/9 

PROGRAM X(INPUT,OUTPUT) 



The =FILE default tells the FTN compiler to search for input from file SLEEP. Since CCL left file 
SLEEP positioned after ZZZ, the compiler starts reading immediately after procedure ZZZ. Substitution 
occurs in ZZZ but not in the FORTRAN program. 
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.EOR 



The .EOR command causes an end-of-record to be recorded on the data file specified by a .DATA command. 
After a .EOR command, statements are written onto a new record. CCL recognizes .EOR only after it 
encounters a .DATA command. Comments cannot follow the command name; the remainder of the command 
must be blank. 



The format of the .EOR command is: 
.EOR 

.EOF 



The .EOF command causes an end-of-partition to be recorded onto the data file specified by a .DATA 
command. After a .EOF command, statements are written onto a new partition. EOF is used instead of 
EOP for compatibility with other systems. CCL recognizes .EOF only after it encounters a .DATA command. 
Comments cannot follow the command name; the remainder of the command must be blank. 



The format of the .EOF command is: 
FOP 



A .* command provides comments within a procedure. These comments do not appear in the dayfile. If the 
user wants comments to appear on the dayfile, the COMMENT statement should be used. The remainder of 
this command (after the .*) can contain any combination of characters. When CCL calls a procedure, it dis- 
cards all .* commands before it begins processing. 



The format of the .* command is: 
.""comment 
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SAMPLE JOBS 



The following jobs demonstrate the use of a procedure and some of the other capabilities of CCL. 
statements generated by the processing of a procedure are indicated by a bracket. 



Control 



1. Job 



Dayfile 






FTN,I=ZZCCLAA. 
COMPILING FTNPROC 
LOO, 

STOP 

.004 CP SECONDS EXECUTION TIME 
REVERT. CCL 



nrnrvT r "i ' \trtn/\/'i ivmrPT 

7/8/9 

.PROC,FTNPROC,K==DATA. 

FTN,I=K. 

LGO. 

.DATA 

PROGRAM FTNPROC(OUTPUT) 

A=8.8 

B=4.4 

C=A/B 

PRINT *,C 

STOP 

END 
6/7/8/9 

This job demonstrates the use of the .DATA command. The user calls a procedure FTNPROC con- 
taining a FORTRAN program in the procedure body. The statements preceding the .DATA command 
compile and execute the program. 



Dayfile 

ATTACH, HERE, ID*MINE. 

PFN IS 

HERE 

PF CY CLE NO. t 001 

BEGIN,THIS, INPUT. 

FTN,I»HERE. 

COMPILING HERE 

LOO. 

STOP 

.0J33 CP SECONDS EXECUTION TIME 
REVERT..CCL 



The user has z permanent file HERE containing a FORTRAN program he wishes to execute. The user 
attaches the file and calls procedure THIS to execute the program. 



Job 

ATTACH,HERE,ID=MINE. 

BEGIN,THIS,INPUT. 

7/8/9 

.PROC,THIS,J=HERE. 

FTN,I=J. 

LGO. 

6/7/8/9 
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3. Job 



Dayfile 



ATTACH,HERE,ID=MINE. 

EXIT,U. 

IFE,FILE(HERE,PF),GO. 

BEGIN,TfflS,INPUT. 

ELSE,GO. 

ATTACH,THERE,ID=MINE. 

BEGIN,THIS,INPUT,J=THERE. 

ENDIF.GO. 

7/8/9 

.PROC,TfflS,J=HERE. 

FTN,I=J. 

LGO. 

6/7/8/9 



ATTACH, HERE, ID=MINE. 

PFN IS 

HERE 

FILE NOT CATALOGUED, SN-PFQ5ET 

PF ABORT 

EXIT,U. 

IFE*FILE(HERE, PF) f QO. 

ELSE,QO. 

ATTACH,THERE, ID=MINE. 

PFN IS 

THERE 

PF CYCLE NO. = 001 

BEGIN, THIS , INPUT, J=3BERE . 

FTN,I*THERE. 

COMPILING THERE 

LOO. 

STOP 

.002 CP SECONDS EXECUTION TIME 
REVERT. CCL 
ENDIF,GO. 

In this example, the user wishes to execute a FORTRAN program on permanent file HERE; however, 
the user suspects that file HERE has been purged. The IFE statement checks the attach with the FILE 
function. If the attach is successful, procedure THIS executes the program. The ELSE statement skips 
control statements up to the ENDIF statement. 

If the attach is unsuccessful, CCL skips to the ELSE statement. Another permanent file (THERE) con- 
taining a FORTRAN program is attached. Procedure THIS is called to execute this program. The call 
statement indicates THERE replaces formal keyword J in the procedure body. 
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Job 



Dayfile 



ATTACH,OTHER,ID=MINE. 
ATTACH,WHERE,ID=MINE. 
WHILE,R1 XE.l .CIRCLE. 
SET,EF=0. 

SET,EFG=0. 

nrnm i-nr» * m rtfni inn ttijiv r-iir 

BtHjUN, 1 HA I ,U 1 nCK., W hERE. 

DISPLAY,EFG. 

IFE,EFG=0,HOP. 

SET,R2=R2+1. 

ENDIF.HOP. 

SET,R1=R1+1. 

DISPLAY,R1 . 

ENDW.CIRCLE. 

DISPLAY,R2. 

6/7/8/9 



Procedure (Contents of File OTHER) 

.PROC,THAT,KEY. 

FTN,I=KEY. 

LGO. 

SKIP.JUMP. 

EXIT,S. 

ENDIF,JUMP. 

REWIND.LGO. 

DISPLAY,EF. 

6/7/8/9 



ATTACH , OTHER, ID=MINE . 

PFN IS 

OTHER 

PF CYCLE NO. = 001 

ATTACH , WHERE , ID=MINE . 

Pr in ±d 

WHERE 

PF CYCLE NO. = 001 

WHILE , Rl . LE . 1 , CIRCLE . 

SET,EF=0. 

SET,EPG=0. 

BEGIN,THAT,OTHER, WHERE. 

FTN,I«WHERE. 

COMPILING ONE 

LGO. 

FATAL LOADER ERROR - SEE MAP 
EXIT,S. 
ENDIF,JUMP. 
REWIND f LQO. 
DISPLAY, EF. 

4 4B 
REVERT. CCL 
DISPLAY, EFG. 

4 4B 
IFE,EFG=0,HOP. 
ENDIF,HOP. 
SET,R1=R1+1. 
DISPLAY, Rl. 

1 IB 
ENDW, CIRCLE. 
WHILE , Rl . LE . 1 i CIRCLE . 
SET,EF=0. 
SET,EFG=0. 

BBGTN,THAT,OTHER,WHERE. 
FTN,I=WHERE. 
COMPILING TWO 
LGO. 

STOP 

.003 CP SECONDS EXECUTION TIME 
SKIP,JUMP. 
ENDIF r JUMP. 
REWIND,LGO. 
DISPLAY, EF. 

0B 

REVERT ."CCL 
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Dayfile 

DISPIAY,EEG. 

0B 
IPE,EPG=0VHOP. 
SET, E2=R2+1 . 
ENDIF,HOP. 
SET;RL*R1+1. 
DISPLAY ,"R1. 

2 2B 
END»,CIRCLE. 
WBILE^Rl.LE.l^aRCLE. 
ENDW,CIRCDE. 
DISPLAY /R2. 

1 IB 

The user has two permanent files. File OTHER contains procedure THAT, which compiles and 
attempts to execute a FORTRAN program. File WHERE contains two FORTRAN programs the user 
wishes to check for errors. 

Once the two files are attached, the WHILE and ENDW statements bracket the control statements that 
test the programs on file WHERE. After ensuring both error flags (EF and EFG) have zero values, 
procedure THAT is called. THAT attempts to execute the program read from file WHERE. If there 
are fatal FORTRAN errors, the job aborts when the program is loaded. Processing resumes when the 
EXIT,S statement is encountered. If there are no fatal FORTRAN errors, the SKIP statement skips 
over the EXIT.S statement to ENDIFJUMP. and processing resumes. The DISPLAY statement indi- 
cates the value of EF. 

Loading a FORTRAN program containing a fatal error changes EF to a non-zero value. When process- 
ing returns to the job control statement record, the value of EFG is set to the value that EF last had 
in the procedure. If there were no fatal errors, the value of R2 is incremented by one. R2 counts the 
number of executable FORTRAN programs. Each pass through the bracket statements increments the 
value of Rl by one. Rl counts the number of passes through the bracketed statements. 

CCL processes the WHILE statement a third time. CCL evaluates the WHILE expression as false, and 
all statements are skipped until an ENDW statement with a matching label string is found. At the end 
of the job, the value of R2 is displayed so the user can tell at a glance the number of successfully 
executed FORTRAN programs. 
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The file environment table (FET) is a communication area supplied by the user within his field length. Any 
file to be written, read, or otherwise manipulated or positioned, must have its own FET. The FET is interro- 
gated and updated by the system and user file processing. 

COMPASS programmers can create an FET in two ways: 

Use the FET creating macros FILEB, FILEC, RFILEB, or RFILEC. 

Use other COMPASS instructions to build a table in the format expected by the system. 

Compiler language programmers need not be concerned with FET construction or manipulation, because the 
compilers will perform these tasks in response to compiler language instructions. When CDC CYBER Record 
Manager is used for input/output, the user need supply only the file information table (FIT) data. CDC 
CYBER Record Manager will construct and manipulate the FET from information in its FIT. The FIT is 
fully described in the CDC CYBER Record Manager manuals. 

A minimum size FET is five words, which allows for processing of sequential unlabeled files. Random or 
labeled files, or files in which the user will process file conditions or errors with OWNCODE routines, require 
a longer table. Extensions to the FET, areas identified by pointers within the FET, are required for extended 
error and label processing. Some compilers append an area past word 13 of the FET, as explained in the 
respective manuals. When S and L tapes are processed, the FET must be at least seven words in length. 

The format of the FET is shown in figure 6-1. Some fields are pertinent only to CDC CYBER Record 
Manager manipulation. A description exists in the reference manuals for CDC CYBER Record Manager. 
Other fields contain different data depending on the file mode or residence. 

FET CREATION MACROS 

System macros in the COMPASS language facilitate generation of the FET. 

All parameters except lfn, fwa, and f are optional. The fwa and f parameters must be in the order shown; 
others can be in any order. The macro parameters WSA, OWN, XPR, and IND are not order dependent, but 
order is fixed within these parameters. 

The user must specifically allocate the circular buffer location in the field length as well as the buffers for the 
WSA, XPR, and XLR parameters. The macro identifies but does not create the buffers. 

Four macros are available, depending on whether the file is coded or binary, random or sequential. 
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53 



47 



41 



35 32 29 



23 



17 13 



LOGICAL FILE NAME 



DEVICE TYPE 



F t 



U E 






E N 
PCS 



DISPOSITION 
CODE 



FET 

LENGTH 

-5 



FNT POINTER 



RECORD BLOCK SIZE 



PRU SIZE 



DETAIL 

ERROR CODE 

(XP-1) 



FWA 
WORKING STORAGE AREA 



POINTER TO 

FET EXTENSION 

(XP-1) 



UBC 



LEVEL 
NO. 



ERROR 
CODE 



CODE^STATUS 



Address 
f Ifn+n 





FIRST POINTER 



IN POINTER 



OUT POINTER 



LIMIT POINTER 



CRM PSEUDO IN POINTER 



LWA+1 
WORKING STORAGE AREA 



MLRS (S/L TAPES ONLY) 



RECORD REQUEST/RETURN INFORMATION 
(RANDOM RMS ONLY) 



CRM FET EXTENSION (XP=1) 



| STANDARD INDEX LENGTH j FWA OF STANDARD INDEX* 




t RESERVED 



Figure 6-1 . File Environment Table 
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CODED SEQUENTIAL FILE 
lfn FILEC 



fwa ) f > (WSA=addrw,lw),(OWN=eoi,err),LBL,UPR,EPR,XPR=xpadr,UBC=ubcJkILR=mlrs, 
(XLR=xiadr,xil) 

BINARY SEQUENTIAL FILE 

lfn FILEB fwa,f,(WSA=addrw,lw),(OWN=eoi,err),LBL,UPR,EPR,XPR=xpadr,UBC=ubc>ILR=mlrs, 

(XLR=xladr,xll) 

CODED RANDOM FILE 

lfn RFILEC fwa,f,(WSA=addrw ) lw) ) (IND=addriAi) ) (OWN=eoi,err) ) LBL,UPR ! EPR,XPR=xpadr 

BINARY RANDOM FILE 

lfn RFILEB fwa,f,(WSA=addrw,lw),(IND=addri4i),(OWN=eoi J err),LBL,UPR J EPR,XPR=xpadr 

Further explanation of parameter usage appears with descriptions of the FET fields below. 



lfn 

fwa 

f 

WSA 

addrw 

lw 

IND 

addri 
li 

OWN 

eoi 

error 



Logical file name 

Circular buffer address; substituted in FIRST, IN, and OUT 

Length of circular buffer; fwa+f is substituted in LIMIT to make buffer address 
lwa+1; f should be at least one word larger than PRU size of the device on which 
the file resides 

Working storage area keyword; parameters required for READIN and WRITOUT; 
relieves user of responsibility for buffer manipulation 

First word address of working storage area 

Length of working storage; when coded files are being processed, the length must be 
at least as long as the longest record, or data will be lost 

Index buffer parameter keyword; required for name/number index random files only 

First word address of index buffer 

Length of index buffer; for numbered indexed files, length should allow one word for 
each record plus a one word header; for named indexed files, two words are required 
for each record in addition to the index header 

OWNCODE routine parameters keyword 

Address of routine to be executed if end-of-volume, end-of-device, or end-of-information 
occurs; UPR must be used 

Address of routine to be executed if file action errors occur; EPR must be used 
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UPR User specifies processing at end-of-volume, end-of-pack for user device sets, or end-of- 

information; sets bit 45 of word 2 (lfn+1) 

LBL Label information will follow for magnetic tape file; LABEL macro providing label 

information must immediately follow the FET creating macro to which it pertains 

EPR User specifies handling of file action error conditions; sets bit 44 of word 2 (lfn+1); 

does not set extended error processing flag 

UBC Unused bit count keyword; required only for S and L tapes 

ubc Specifies number of bits in last word of record that do not contain valid data 

MLR Maximum record size keyword; required only for S and L tapes 

mlrs Maximum number of 60-bit words in record 

XPR Extended error information to be returned by system 

xpadr First word address of FET extension for extended error processing 

XLR Extended label processing keyword 

xladr First word address of extended label processing buffer 

xll Length of extended label buffer 

Examples: 

To create a minimum FET for the standard INPUT file: 

LBUFFER EQU 65 

INPUT FILEC BUFFERJLBUFFER 

To create an FET for a binary random file: 

LBUFFER EQU 65 

LINDEX EQU 25 

FILEABC RFILEB BUFFER,LBUFFER,(IND=INDEX,LINDEX) 

To create an FET for a labeled tape file with user processing at end-of-volume condition. OWNCODE routine 
is supplied: 

LBUFA EQU 65 

TAPE1 FILEB BUFA,LBUFA,LBL,UPR,(OWN=PROCEOR) 

TAPE1 LABEL SORTINPUTTAPE,32,90 

To create an FET for a list file. OWNCODE routines are supplied and the working storage area is used: 

LBUFB EQU 65 

PRINT FILEC BUFB,LBUFB,(WSA=LINE,14),(OWN=ENDING,ERRORS),UPR,EPR 
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FET FIELD DESCRIPTION 

Words of the FET are numbered 1-13 in decimal, corresponding to the addresses lfn through lfn+14 octal. All | 
parameter values are octal unless otherwise noted. Bits are numbered 0-59 right to left in decimal. i 

LOGICAL mlc rs/vME, (im) ibus io-j? ai mi; 

The lfn field. contains one to seven display-coded letters or digits starting with a letter, left justified; if less 
than seven are declared, unused characters are zero-filled. This field is used as common reference point by the 
central processor program and the peripheral processor input/output routines. 

The lfn parameter declared in an FET creation macro is also used as the location symbol associated with the 
first word (lfn+0) of the FET. A reference to lfn in the file action requests is a reference to the base address | 
of the FET. 

CODE AND STATUS (CS) (bits 0-17 at lfn) 

The CS field is used for communication of requested functions and resulting status between the central pro- 
cessor program and the peripheral processor input/output routines. This field is set to the request code by 
CPC when a file action macro request is encountered. When the FET is generated, bits 2-17 should be zero. 

The code and status bits have the following significance: 

Bits 14-17 Record level number. On skip and write record requests, this subfield is set by CPC 

as part of the function code. On read requests, it is set by CIO as part of the status 
when an end-of-record is read. Initially the level subfield is set to zero when the 
FET is generated. 

Bits 9-13 Status information upon request completion. Zero indicates normal completion. 

Non-zero indicates an abnormal condition, not necessarily an error; an OWNCODE 
routine, if present, will be executed. Status codes are described with the EOI 
OWNCODE and Error Exit Address discussions. Initially, this subfield is set to zero 
when the FET is generated. 

Bits 0-8 Used primarily to pass function codes to a peripheral processor. Function codes 

are even numbers (bit has a zero value). They are listed as CIO codes below. 

When the request has been processed, bit is set to one. When the FET is generated, 
bit must be set to one to indicate the file is not busy. 

Bit Current status of request (0 = file being processed, 1 = request 

complete). 

Bit 1 Specifies the mode of the file (0 = coded, 1 = binary). Bit 1 is not 

altered by CPC when a request is issued. 

Bits 2-8 Pass function codes to a peripheral processor (file action requests). 
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Bits 3 and 4 These bits will be set to binary 10 if end-of-record is read, or to binary 
1 1 if end-of-partition is read. 

CIO function codes listed below can be set in bits 0-8 of the CS field by the user before calling CIO to carry 
out the function. They are set by CPC when file action macros are used. All values are octal. 

All codes not listed are illegal. All codes are shown for coded mode operations; add 2 for binary mode (for 
example, 010 is coded READ, 012 is binary READ). Upon completion of operation, code/status in FET is 
changed to an odd number, ususally by adding 1 to the code. In some cases, code is further modified to 
indicate manner in which operation concluded [for example, a READ function 010, at completion, becomes 
011 (buffer full), 021 (end of system-logical-record), or 031 (end-of-partition)]. 

General code meanings are: 

200 series for special reads or writes (reverse, skip, non-stop, rewrite, etc.) 

300 series for open and close 

400 series reserved for CDC 

500 series reserved for installations 



600: 


series for skip 










700 series reserved for CDC 










Code 


Function 


Code 


Function 


Code 


Function 


000 


RPHRt 


104 


OPEN/WRITE/NR 


224 


REWRITER 


004 


WPHRt 


110 


POSMF 


234 


REWRITEF 


010 


READ 


114 


EVICT 


240 


SKIPF 


014 


WRITE 


120 


OPEN/NR 


250 


READNS 


020 


READSKP 


130 


CLOSE/NR 


260 


READNttt 


024 


WRITERtt 


140 


OPEN 


264 


WRITENttt 


034 


WRITEF 


144 


OPEN/WRITE 


300 


OPEN/NR 


040 


BKSP 


150 


CLOSE 


330 


CLOSER 


044 


BKSPRU 


160 


OPEN 


340 


OPEN 


050 


REWIND 


170 


CLOSE/UNLOAD 


350 


CLOSER 


060 


UNLOAD 


174 


CLOSE/RETURN 


370 


CLOSER/UNLOAD 


100 


OPEN/NR 


214 


REWRITE 


374 
640 


CLOSER/RETURN 
SKIPB 



t Applies to SI tapes only. 
| ttwhen a WRITER function is issued with level 
a function issued as a 24 will return as a 34. 
ttt Applies to S and L tapes only. 



17g specified, the function is changed to a WRITEF. Thus, 
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DEVICE TYPE (dt) (bits 48-59 at lfn + 1) 

The device type value will be returned to the FET device type field when a file action request is issued if 
FET length exceeds the minimum. The 6-bit device type will occupy bits 54-59; bits 48-53 will hold recording 



technique identiiicauon lor iiiagiicik; la^es, u appucauie. 
statement. 
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Device Type Mnemonic 



AY 
AZ 
AH 

AX 

LM 



Device Type Value 

01-05 

06 

07-12 

13 

14 

15 

16-17 

20 

21-25 

26 

27 

30-37 



Device 

Reserved for CDC 

Reserved for installations 

Reserved for CDC 

844-21 disk drive 

84441 disk drive 

819 disk drive 

Reserved for CDC 

ECS resident files 

Reserved for CDC 

link medium file 

Reserved for CDC 

Reserved for installations, mass storage only 



Magnetic tapes have the following codes. 

Device Type Mnemonic Device Type Value (Octal) 

MT 40 7-track magnetic tape 



NT 



41 9-track magnetic tape 
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Recording Technique 
(Right 6 bits of FET dt Field in Biliary) 

xxxxOO HI density 556 Dpi 
xxxxOl LO density 200 bpi 
xxxxlO HY density 800 bpi 
xxxxll Reserved for CDC 
xxOOxx Unlabeled 
xxOlxx SI standard U and Z labels 
xxlOxx 3000 series label (Y) 
xxllxx Reserved for CDC 
OOxxxx SI data format 
Olxxxx Reserved for CDC 
lOxxxx S data format 
1 lxxxx L data format 

xxxxOO Reserved for CDC 
xxxxOl GE density 6250 cpi 
xxxxlO HD density 800 cpi 
xxxxll PE density 1600 cpi 
xxOOxx Unlabeled 
xxOlxx SI standard U label (ANSI) 
xxlOxx 3000 series label (Y) 
xxllxx Reserved for CDC 
OOxxxx SI data format 
Olxxxx Reserved for CDC 
lOxxxx S data format 
1 lxxxx L data format 
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Recording Technique 



Device Type Mnemonic 


Device Type Value (Octal) 


(Right 6 bits of F 


-t 


42 Member multi-file set 
7-track tape 


Same as in MT 


_t 


43 Member multi-file set 
9-track tape 


Same as in NT 


_t 


62 7-track multi-file set tape 


Same as in MT 


_t 


63 9-track multi-file set tape 


Same as in NT 



Unit record devices have the following codes. 



Device Type Mnemonic 

TRtt 
TPtt 

LP+t 



LRtt 

LStt 

LTtt 

CRtt 
KB 



CPtt 
DS 

GCtt 
HCtt 
FMtt 
PLtt 



Device Type Value (Octal) 



Device 



44 


Paper tape reader 


45 


Paper tape punch 


4647 


Reserved for installations 


50 


Any available line printer 


CI 


TF^.-t.s*.*.-. A C /"■TV*" 


52 


Reserved for installations 


53 


580-12 line printer 


54 


580-16 line printer 


55 


580-20 line printer 


56-57 


Reserved for installations 


60 


405 card reader 


61 


Remote terminal keyboard 


64ttt.65 


Reserved for CDC 


66-67 


Reserved for installations 


70 


415 card punch 


71 


6612 keyboard/display console 


72 


252-2 graphic console 


73 


253-2 hardcopy recorder 


74 


254-2 microfilm recorder 


75 


Plotter 


76-77 


Reserved for installations 



tCode is generated when a tape is declared to have MF characteristics; the multi-file set code 62 or 63 is 
used only in system tables; it is not returned to the user's FET. 
tt Supporting software must be supplied by the installation, 
ttt Device code 64 cannot be assigned. REQUEST processing uses code 64 to indicate a tape file in the pro- 
cess of being assigned. 
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RANDOM ACCESS (R) (bit 47 at Ifn + I) 

A one in the R field indicates a random access file. R may be set to 1 by using the RFILEB or RFILEC 
macro. When a file is opened or closed, the R setting determines action performed with regard to the index 
as shown below. 

The index is that used by name/number index random files, not CDC CYBER Record Manager. 



OPEN 


FET R=0 


FET R=l 


No index 


No index action 


FET R bit is set to zero. 


Index 


No index action 


Index is read into index buff 



specified, FET R bit is set to zero and a non-fatal 
diagnostic is sent to day file. The index buffer is zeroed 
out before the index is read. 

If a non-existent file is opened, the value of the R bit is not altered. The index buffer specified in the FET 
is zeroed out. 



CLOSE 

File currently 
has index 



FET R=0 

File is flagged as 
not having index 



File currently 
has no index 



No index action 



FET R=l 

If index buffer exists or previous operation was write, 
the index is written, and file is flagged as having index. 
If buffer is not specified, a non-fatal diagnostic occurs. 

If file is written while R=l during this job, or if pre- 
vious operation was write, the file is flagged as having 
an index and the index is written. If index buffer is 

not ctv»/»ifipH a nnr»_fo+o1 <4i<imiric+i/» r»/»/»n»-e 

The above actions are taken only if the contents have been altered since the file was last opened. 

When any other file action request is issued, the r setting determines the access method to be used. If r = 0, 
the file is read or written beginning at the current location. If r = 1, the file is read or rewritten according 
to the logical disk address in FET word 7 (lfn + 6), or written at the end-of-information; and the logical disk 
address is returned to FET word 7 (lfn + 6). 

RELEASE (N) (bit 46 at lfn + 1) 

This bit is reserved for the operating system. 

USER PROCESSING (UP) (bit 45 at lfn + 1) 

The UP bit may be used to control tape end-of-volume and device set end-of-device processing. If the UP bit 
is zero, unit swapping is automatic without notification to the user; the function in process when end-of-volume 
or end-of-device is detected is completed on the next unit. If the UP bit is set to one, the user is notified 
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when an end-of-volume or end-of-device condition arises. End-of-volume for tape files is defined as a tape 
mark followed by an EOV1 label for labeled tapes and SI format unlabeled tapes, or as the first tape mark 
after the EOT reflective spot for unlabeled S and L tapes. End-of-device for RMS files is defined by an 
overflow RBT word pair. 

If the UP bit is set, end-of-volume and end-of-device status (02) is returned in bits 9-13 of the FET code and 
status field. Functions that do not transfer data from the circular buffer will have been completed; data 
transfer function may be re-issued as indicated by an examination of the buffer pointers. If CPC is in use, 
control is returned to the EOI OWNCODE routine if declared in bits 30-47 of lfn + 8. If a continuation volume 
or device is desired, a CLOSER function should be issued. If end of volume processing without a continuation 
volume is desired, a CLOSER/RETURN should be issued. 

ERROR PROCESSING (EP) (bit 44 at lfn + 1) 

The EP bit is set when the calling program is to be notified of error conditions arising from file actions. Error 
codes returned to the code and status field are listed under the error address field. Control is given to the 
user OWNCODE routine at error address when EP is set. If EP has not been set, the operator is informed of 
the error and must authorize job termination or continuance regardless of the error. The following errors 
cause control to be returned to the user when the EP bit is set. 

CIO code not legal on this device 

READ or SKIP forward function immediately follows WRITE function 

FET buffer pointers out of bounds 

READ attempted on a file without read permission 

WRITE attempted on permanent file not positioned at end of information 

Open function on an existing random indexed file with too small index buffer 

REWRITE on permanent file without MODIFY permission 

WRITE on permanent file without EXTEND permission 

EVICT on permanent file 

Device is full and overflow is not allowed 

Parity error on an ECS resident file 

Index error on an ECS resident file 

Unrecovered RMS error 
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NO RECOVERY (EB) (bit 43 at lfn + 1) 

This bit can be set to control error recovery. If it is set, no attempt will be made to recover errors encountered 
while reading data on magnetic tape. 

MULTI-USER JOB (MUJ) (bit 42 at lfn + 1) 

Set only when the file is being processed by a multi-user job. Currently, the EDITOR routine in INTERCOM 
is the only system-supplied multi-user job. When bit 42 is set, user id, user table address, and a special code 
(for routine 3TT) appear in lfn + 5. 

EXTENDED LABEL PROCESSING (XL) (bit 41 at lfn + 1) 

This bit affects processing of labels on magnetic tape. Format to be used in the label fields in lfn + 10 
through lfn + 12 depends on this setting. Standard label processing of required labels occurs when XL=0. 
If XL> 1, the user can process optional labels, as described under Tape Label Processing later in this section. 

EXTENDED ERROR PROCESSING (XP) (bit 40 at lfn + 1) 

The upper 12 bits of FET word 7 (lfn + 6) detail errors indicated by bits 9-13 of FET word 1 if the XP bit I 
equals 1, as explained under FET Extension Pointer field. An error message is displayed on the B display 
and is written to the dayfile. If this bit is not set, the operator is informed of unrecovered errors and has 
the option of dropping or continuing the job. 

The EP bit must be set before control can return to the user OWNCODE to process these errors. Also, the 
UP bit must be set to gain control at end-of-volume. 

When XP is set, the FET extension pointer in word 7 (lfn + 6) must be set. I 

EC (bit 39 at lfn + 1) 

This bit is reserved for the operating system. 

NON-STANDARD LABEL (NS) (bit 38 at lfn + 1) 

Setting this bit to 1 indicates non-standard labels exist. All processing must be done by the user program. 
Non-standard labels are not supported on SI format tapes. 

INHIBIT IMPLICIT MOUNT (IIM) (bit 37 at lfn + 1) 

This bit can be set to prevent implicit mounting of disk devices which would otherwise occur in situations 
such as disk overflow or new file assignment. 

RLE FLUSH (FF) (bit 36 at lfn + 1) 

Setting this bit to 1 indicates that a sequential scratch file will be flushed (unwritten data sent to mass 
storage) if the job ends abnormally. 
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DISPOSITION CODE (bits 35-24 at lfn + 1) 

The values shown below are returned to the FET disposition code field when a file action request is issued 
with the FET length greater than the minimum. A file with a special name automatically is assigned the 
corresponding disposition code value when the file is created. 

Codes on LABEL or REQUEST control statements for tape files set these values in the FET: 



Code 

CK 
IU 
CI 

sv 
cs 



FET Value 




(Octal) 


Disposition 


xxOl 


Checkpoint 


xx02 


Inhibit automatic unload of tape 


xx03 


Checkpoint and inhibit unload tape 


xx04 


Inform operator to save tape 


xx05 


Checkpoint and save tape 



For rotating mass storage files, bits 35-24 of lfn + 1 are divided into four fields. The user cannot alter file 
disposition by changing this field. Rather, the DISPOSE or ROUTE control statement or macro must be used. 



35 33 




31 


29 24 




T 






EC 


1 
D 


C 


DC 



EC (bits 35-33) External characteristics: 



Code 


FET 
Value 
(Binary) 


Default/default 


000 


— /EC=SB 
EC=A4/EC=80COL 


001 
010 


EOB4/ — 
EC=B6/EC=026 
EC=A6/EC=029 
EOA9/EC= ASCII 


011 
100 
101 
110 
111 


TID (bit 32) Terminal identif 


Code 


FET 

Value 

(Binary) 


TID=C 
TID=id 


1 




Description 

Default print train/default punch 

character set 
Reserved/punch standard binary 
ASCII 48-character print train/punch 

free-form binary 
BCD 48-character print train/reserved 
BCD 64-character print train/punch 026 
ASCII 64-character print train/punch 029 
ASCII 96-character print train/punch ASCII 
Reserved for installations 



Special 
File Name 

OUTPUT/PUNCH 

— /PUNCHB 
— /P80C 



Terminal identifier which applies only to local files, not queue files: 



Description 

Ignore remote ID in file routine 
Route file to remote user with terminal 
identification id 
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IC (bits 31-30) 


Internal: 

FET 








Value 




Special 


Code 


(Binary) 


Description 


File Name 


IC=DIS 


00 


File format is display code 


OUTPUT/PUNCH 


IC= ASCII 


01 


File format is ASCII 


/ 


IOBIN 


10 


File format is binary 


/PUNCHB.P80C 


IC-TRANS 


11 


File format is transparent 
(INTERCOM 5) 


-'— 1 


DC (bits 29-24) 


Disposition code 
FET 


*• 






Value 




Special 


Code 


(Octal) 


Description 


File Name 


__ 


01 


Reserved 







02 


Reserved 







03 


Reserved 




— 


04 


Job ready for scheduling 




— 


05 


Job has tape requirements 




— 


06 


Job has tape requirements with VSN 
information 







07 


Reserved 




PU 


10 


Punch 


PUNCH,PUNCHB ) P80C 


FRt 


20 


Film print 


FILMPRt 


FLt 


22 


Film plot 


FILMPLt 


HRt 


24 


Hardcopy print 


HARDPRt 


HLt 


30 


Plot 


PLOTt 


PR 


40 


Print on any available printer 


OUTPUT | 


LR 


43 


Print on 580-12 line printer 




LS 


44 


Print on 580-16 line printer 




LT 


45 


Print on 580-20 line printer 





LENGTH OF FET (bits 18-23 at lfn + 1) 

The system FET length is determined as follows: FET first word address + 5 + lgth = last word address + 1. 
The minimum FET length is five words (lgth=0). If the minimum FET is used, only the logical file name, 
code and status field, FIRST, IN, OUT, and LIMIT are relevant; other fields are not checked by the operating 
system. An FET of six words (lgth+1) is used if a working storage area is needed for blocking/deblocking. 
An FET of eight words (lgth+3) is used if the r bit is set, indicating an indexed file. Length is nine words 
(lgth=4), if OWNCODE routines are declared. 



t Supporting software must be supplied by the installation. 
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FNT POINTER (bits 48-59 at lfn + 4) 

The FNT pointer is set by the operating system, upon return from a file action request, to the location of the 
file entry in the file name table. The pointer is placed in the FET to minimize table search time and does 
not affect the program. In the case of a minimum FET, CPCIO updates the pointer; PPCIO does not. 

RECORD BLOCK SIZE (bits 34-47 at lfn + 4) 

If the file resides on an allocatable device, the size of the device record block is returned in this field when 
the file is opened. It is given as the number of physical record units in a record block. If the number of 
PRUs is not defined or is variable, the field is set to zero. Record block size is not returned if a ininimum 
FET is used. 



PHYSICAL RECORD UNIT SIZE (PRU) (bits 18-33 at lfn + 4) 

The physical record unit size of the device to which the file is assigned is returned in this field when a file is 
opened. It is given as the number of central memory words. The PRU size is used by CPC to determine 
when to issue a physical read or write. PRU size will not be returned if a minimum FET is used. 



FIRST, IN, OUT, LIMIT (bits 0-17 at lfn + 1 through lfn + 4) 

The fields contain the beginning address (FIRST) and last word address + 1 (LIMIT) which define the file 
circular buffer. The IN and OUT pointers indicate the address of data placed into or removed from the 
buffer. System and programmer use of these fields is discussed under the heading Circular Buffer Use. 



WORKING STORAGE AREA (WSA) (lfn + 5) 

The two fields in this word of the FET specify the first word address (bits 30-47) and last word address + 1 
(bits 0-17) of a secondary buffer within the program field length. The area is needed to use the system 
macros READIN and WRITOUT, which blocks or deblocks records from the area into the circular buffer. 
READIN and WRITOUT relieve the user of responsibility for circular buffer pointer manipulation. 



DETAIL ERROR CODE (bits 48-59 at lfn + 6) 

When the XP bit is set to 1, this field contains extended tape error processing codes which give additional 
detail of abnormal conditions resulting from the last input/output operation. The user is responsible for 
clearing this field after reading it. 

Codes 1-77 (octal) are considered software warnings to the user; they are not results of hardware failures. 
The tape related codes and subsequent software warnings are as follows: 

Error Codes 
(Octal) Software Warning 

24 Read error in opposite mode 

25 Function not complete 
27 Record fragment possible 
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Error Codes 
(Octal) Software Warning 
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31 Multi-file set ill-formed 

32 Write attempt on protected volume 
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35 Multi-file name not found on multi-file device 

36 Next volume unknown 

37 File not allowed on assigned device 



Codes 1 00-177 (octal) are considered cases where the tape unit has lost position. These codes are as follows: 

Error Codes 
(Octal) Position 

100 Position uncertain - data intact 

101 Position uncertain - data destroyed 

102 Physical/logical positions disagree 

103 Position uncertain - ready dropped during last operation 

Codes 200-277 (octal) are considered unit oriented errors. Switching physical tape devices allows the program 
to continue after repositioning. These codes and subsequent errors are as follows: 



ror Codes 




(Octal) 


Unit 


200 


System error - tape table 


201 


Hardware - unit hung busy 


202 


Hardware - no end of operation 


203 


Hardware density change during I/O 


204 


Unit reserved by another buffer controller 


205 


Loop fault 


206 


Unable to read tape just written 


207 


Marginal transport indication 


210 


Lost data 


211 


Multiple load points on tape 


212 


No read after write 


213 


Coldstart 


214 


Irrecoverable write reposition error 


215 


Attempt to use downed unit 



Codes 400-477 (octal) are errors resulting from hardware failure between the PPU and the physical tape unit. 
These codes and subsequent errors are as follows: 

Error Code 
(Octal) Data Path Error 

400 Hardware - 6681 or 6683 malfunction 

402 Hardware - 6681 failed, no data on IAN 

403 Hardware - transmission parity error 

404 System error 
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Codes 1000-1005 (octal) are errors resulting from a bad tape. These codes and subsequent errors are as follows: 



Error Codes 




(Octal) 


Tape (Medium) 


1000 


Tape parity error 


1001 


25 feet erased tape 


1002 


Blank tape read 


1003 


Incomplete erasure of tape bad spot 


1004 


Noise in IRG 


1005 


Erase limit reached 



Codes 6000-7777 (octal) are reserved for installations. 
Codes are combined meanings of the following bits: 

11 10 9 8 7 654 32 



1 

Reserved 
1 


TM 


CE 


UE 


PL 


DE 


DE 


DE 


DE 


DE 


DE 



TM Tape medium 

CE Controller error (controller, 6681, etc.) 

UE Unit caused error 

PL Position lost 

DE Detailed error 

The references to system noise record and last good record refer to procedures the system follows in recovery 
attempts. 

Detailed error codes allow a central processor program to take appropriate action when a non-user caused error 
occurs. For example, the message UBC IN FET TOO LARGE does not have a detailed error code because it 
is a user caused error. On the other hand, the message TAPE PARITY ERROR is assigned to a detailed error 
code because the condition is an external caused error. 



FET EXTENSION POINTER (bits 3047 at lfn + 6) 

When the XP is set, pointer is the required address of an FET extension. Currently, the extension is limited 
to a single word, but the length (L) parameter anticipates future expansion. 

UNUSED BIT COUNT (UBC) (bits 24-29 of lfn + 6) 

The unused bit count field is used only for files in S or L tape format. (If the device type is not magnetic 
tape, this word will contain indexing information.) It is used for communication between the peripheral 
processor input/output routines and the user program. 
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For magnetic tapes with S or L data format, the structure of the word at lfn + 6 is: 
59 29 23 17 



UBC 



MLRS 



For a READ or READSKIP function, the operating system will store into this field the number of low-order 
unused bits in the last data word of the record. The UBC field is not used during a READN request. For a 
WRITE, WRITER, or WRITEF function, the operating system will read the contents of UBC and adjust the 
length of the record accordingly. The operating system does not use the UBC field during a WRITEN request. 

For example, to write a single record of 164 decimal characters, the data length is 17, to the next highest CM 
word. The number of low-order unused bits in the last word would be 36. The user would set UBC = 36, 
set IN and OUT pointers to reflect 17 words of data, and then issue a WRITE or a WRITER. 

For 7-track tape, the UBC may range from to 59, but will always be a multiple of 12 when set as a result 
of a read operation. If it is not a multiple of 12 for a write request, the operating system will truncate the 
value to the nearest multiple of 12; if UBC is 18, the operating system will execute as though it were 12, and 
if UBC is 6, the operating system will execute as though it were 0. The field in the FET remains unchanged. 

For 9-track conversion mode tape, each 6-bit character in memory is converted to an 8-bit character on tape. 
The UBC is set to allow an integral number of characters to be written or read. The UBC is set to a multiple 
of 6 bits as a result of a read operation. For a write request, the operating system will truncate the value to 
the nearest multiple of 6. If the UBC is 19, the operating system will execute as if it were 18. The field in 
the FET remains unchanged. 

For 9-track packed mode tape, four 6-bit characters in central memory are written as three 8-bit characters on 
tape; two central memory words are 15 tape characters. On a read, the UBC is set after an integral number of 
characters have been read from tape. If 3839 tape characters are read, 512 words are put in the buffer and 
the UBC is set to 8. If 511 words are written to tape, the operating system executes as if the buffer contains 
512 words and the UBC is 56. The fields in the FET remain unchanged. 

MAXIMUM LOGICAL RECORD SIZE (MLRS) (bits 0-23 of lfn + 6) 

The MLRS field is applicable only for S or L format magnetic tape files. It defines the size of the largest 
physical record to be encountered when the S or L tape format is used. The size is given in number of 
central memory words. 

For S tape format, if MLRS = 0, the value of the maximum PRU is assumed to be 512 words. For L tape 
format, if MLRS = 0, the assumed maximum PRU is LIMIT - FIRST - 1 for standard reads, and LIMIT - 
FIRST - 2 for READN. 

Since S and L tapes record size is defined in characters, instead of central memory words, the last word may 
contain invalid data. Consequently, UBC is required to attest to the validity of all characters in this word. 
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RECORD REQUEST/RETURN INFORMATION (bits 0-29 of lfn + 6) 

If the file resides on a mass storage device and has the r bit set in word 2, indexing information appears in words 
7 and 8 for communication between the peripheral processor input/output routines and the user program. 

The record request/return information field is set to zero when the FET is generated. Both the indexing 
functions and the peripheral processor input/output routines set the field during random file processing. 

For other than the operating system indexing method, the following information is pertinent. At the start of 
writing .a new system-logical-record, if the random access bit and the record request/return information field 
are non-zero, the latter field is assumed to contain the address of a location within an index. The PP routine 
inserts into that location (in bits 0-23) the PRU ordinal (starting from 1) of the system-logical-record. To 
read the record again, the random access bit should be set to non-zero and the PRU ordinal should be entered 
in the FET in the record request/return information field. 

RECORD NUMBER (bits 36-59 at lfn + 7) 

When an indexed file is processed, this field contains the ordinal of a record identified in the index. Records 
are numbered beginning with 1. 

INDEX LENGTH (bits 18-35 at lfn + 7) 

When an indexed file is processed, this field contains the number of words in the index. One word for each 
numbered record, or two words for each named record, plus a one-word header is required. 

INDEX ADDRESS (bits 0-17 at lfn + 7) 

This field contains the address of the index for a name or number index file. 

| EOI OWNCODE ADDRESS (bits 30-47 of lfn + 10) 

This field contains the address of a user supplied OWNCODE routine to be entered when end-of-information, 
end-of-device, or end-of-volume status is encountered during magnetic tape or device set processing. The UP 
bit must be set if user end-of-volume or end-of-device processing is desired. If an OWNCODE address is specified, 
CPC enters this routine when end-of-information is encountered regardless of the setting of the UP bit. 

CPC enters this routine when bits 9-13 of the code and status field is: 

01 End-of-information encountered after forward operation 

02 End-of-volume reached during magnetic tape forward operation 

02 End-of-device reached during device set processing 

Just before entering an end-of-information OWNCODE routine. CPC zeros bits 9 and 10 of the first word 
of the FET. However, as the routine is entered, register XI still contains the first word of the FET as it 
appeared before those two bits were zeroed. 
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For magnetic tapes with S or L data format, the structure of the word at lfn + 6 is: 
59 29 23 17 





UBC 




MLRS 



For a READ or READSKIP function, the operating system will store into this field the number of low-order 
unused bits in the last data word of the record. The UBC field is not used during a READN request. For a 
WRITE, WRITER, or WRITEF function, the operating system will read the contents of UBC and adjust the 
length of the record accordingly. The operating system does not use the UBC field during a WRITEN request. 

For example, to write a single record of 164 decimal characters, the data length is 17, to the next highest CM 
word. The number of low-order unused bits in the last word would be 36. The user would set UBC = 36, 
set IN and OUT pointers to reflect 17 words of data, and then issue a WRITE or a WRITER. 

For 7-track tape, the UBC may range from to 59, but will always be a multiple of 12 when set as a result 
of a read operation. If it is not a multiple of 12 for a write request, the operating system will truncate the 
value to the nearest multiple of 12; if UBC is 18, the operating system will execute as though it were 12, and 
if UBC is 6, the operating system will execute as though it were 0. The field in the FET remains unchanged. 

For 9-track conversion mode tape, each 6-bit character in memory is converted to an 8-bit character on tape. 
The UBC is set to allow an integral number of characters to be written or read. The UBC is set to a multiple 
of 6 bits as a result of a read operation. For a write request, the operating system will truncate the value to 
the nearest multiple of 6. If the UBC is 19, the operating system will execute as if it were 18. The field in 
the FET remains unchanged. 

For 9-track packed mode tape, four 6-bit characters in central memory are written as three 8-bit characters on 
tape; two central memory words are 15 tape characters. On a read, the UBC is set after an integral number of 
characters have been read from tape. If 3839 tape characters are read, 512 words are put in the buffer and 
the UBC is set to 8. If 511 words are written to tape, the operating system executes as if the buffer contains 
512 words and the UBC is 56. The fields in the FET remain unchanged. 



MAXIMUM LOGICAL RECORD SIZE (MLRS) (bits 0-23 of lfn + 6) 

The MLRS field is applicable only for S or L format magnetic tape files. It defines the size of the largest 
physical record to be encountered when the S or L tape format is used. The size is given in number of 
central memory words. 

For S tape format, if MLRS = 0, the value of the maximum PRU is assumed to be 512 words. For L tape 
format, if MLRS = 0, the assumed maximum PRU is LIMIT - FIRST - 1 for standard reads, and LIMIT - 
FIRST - 2 for READN. 

Since S and L tapes record size is defined in characters, instead of central memory words, the last word may 
contain invalid data. Consequently, UBC is required to attest to the validity of all characters in this word. 
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RECORD REQUEST/RETURN INFORMATION (bits 0-29 of lfn + 6) 

If the file resides on a mass storage device and has the r bit set in word 2, indexing information appears in words 
7 and 8 for communication between the peripheral processor input/output routines and the user program. 

The record request/return information field is set to zero when the FET is generated. Both the indexing 
functions and the peripheral processor input/output routines set the field during random file processing. 

For other than the operating system indexing method, the following information is pertinent. At the start of 
writing .a new system-logical-record, if the random access bit and the record request/return information field 
are non-zero, the latter field is assumed to contain the address of a location within an index. The PP routine 
inserts into that location (in bits 0-23) the PRU ordinal (starting from 1) of the system-logical-record. To 
read the record again, the random access bit should be set to non-zero and the PRU ordinal should be entered 
in the FET in the record request/return information field. 

RECORD NUMBER (bits 36-59 at lfn + 7) 

When an indexed file is processed, this field contains the ordinal of a record identified in the index. Records 
are numbered beginning with 1. 

INDEX LENGTH (bits 18-35 at lfn + 7) 

When an indexed file is processed, this field contains the number of words in the index. One word for each 
numbered record, or two words for each named record, plus a one-word header is required. 

INDEX ADDRESS (bits 0-17 at lfn + 7) 

This field contains the address of the index for a name or number index file. 

| EOI OWNCODE ADDRESS (bits 30-47 of lfn + 10) 

This field contains the address of a user supplied OWNCODE routine to be entered when end-of-information, 
end-of-device, or end-of-volume status is encountered during magnetic tape or device set processing. The UP 
bit must be set if user end-of-volume or end-of-device processing is desired. If an OWNCODE address is specified, 
CPC enters this routine when end-of-information is encountered regardless of the setting of the UP bit. 

CPC enters this routine when bits 9-13 of the code and status field is: 

01 End-of-information encountered after forward operation 

02 End-of-volume reached during magnetic tape forward operation 

02 End-of-device reached during device set processing 

Just before entering an end-of-information OWNCODE routine. CPC zeros bits 9 and 10 of the first word 
of the FET. However, as the routine is entered, register XI still contains the first word of the FET as it 
appeared before those two bits were zeroed. 
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ERROR EXIT ADDRESS (bits 0-17 of Ifn + 10) 

The field specifies an address to receive control if an error condition occurs after a file action request. The 
EP bit must be set to cause control to pass to this OWNCODE address. The FET code and status field will 
reflect the error condition. If processing can continue, the error routine should exit through its entry point; 
otherwise, an abort request may be issued. If the error address field is zero, the run continues normally. The 
FET code and status bits reflect the error condition upon normal return to the program. 

CS Kts 9-13 

(Octal) Meaning 

04 Irrecoverable parity error on last operation; or lost data on write. Unrecovered error 

other than device capacity exceeded on last magnetic tape operation. 

10 During a magnetic tape read, the physical record size exceeded circular buffer or maxi- 

mum allowable PRU size (MLRS for S and L tapes). Such magnetic tape error is 
termed device capacity exceeded. During a mass storage write, all mass storage space 
meeting the file requirements was in use or otherwise unavailable. 

20 Additional error status returned. 

21 End of multi-file set. File position number is greater than that of the last member 
in the set. Any subsequent attempt to reference the logical file name assigned to 
the non-existent member will result in a fatal error. 

22 Fatal error. 

23 Index full. 

24 Interlock broken for shared rotating mass storage devices. 

25 Attempt made to read or write record number n of a random file, but n exceeds 
index size. 

26 Attempt made to read named record from random file, but name does not appear in 
index. 

27 Attempt made to write named record on random file, but name does not appear in 
index, and index is full. 

30 Function legal but not defined on device. 

31 Permanent file permission not granted. 

32 Function legal except for permanent files. 

33 No public set has the required attributes. 
34-37 Reserved for future use. 
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If both EOI and error routine execution are needed, the error routine is executed. Just before entering an 
error OWNCODE routine, CPC zeros bits 11-13 of the first word of the FET. However, as the routine is 
entered, register XI contains the first word (lfn + 0) of the FET as it appeared before those bits were zeroed. 

LABEL PARAMETERS (lfn + 11 through lfn + 14) 

Words at lfn + 11 through lfn + 14 of the FET may contain information pertaining to magnetic tape labels. 
The format and use of these fields depends on the setting of the extended label processing bit in word 2 
0fn + 1).. The LABEL macro generates fields for normal label processing. Further details appear under the 
Tape Label Processing heading. 

Parameters in these fields must be display code. If other than the LABEL macro is used to create them, display 
code zero may be used to add leading zeros to numeric fields. Character fields, which are left justified, may 
be display code blank filled. 



RESIDUAL SKIP COUNT (RSC) (bits 24-41 at P + 0) 

When XP is set and P is the address of the FET extension word, RSC is the residual skip count. If SKIPF, 
SKIPB, or READSKP functions do not complete the specified number of skips, the count of records yet to 
be skipped is returned here. RSC will have a value when SKIPB encounters beginning-of-information even 
when the UP bit is not set. If SKIPF terminates at end-of-volume because UP is set, RSC will be set. 



PERM BITS (bits 20-23 of P + 0) 

The setting of these bits will duplicate that of the permanent file permission bits in the file name table. 
Permission is granted when the bit indicated is set. 

Bit Meaning 



20 


Read permission 


21 


Extend permission 


22 


Modify permission 


23 


Control permission 



These bits are set when the user issues an OPEN function. 

EXTENSION LENGTH (bits 0-17 at P + 0) 

The length of the extension, including word P, is required. This value must be 1. 
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CIRCULAR BUFFER USE 

For each file, the user must provide one buffer, of any length greater than a PRU size. The buffer is called 
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tion is immediately followed by the lowest. The FET fields FIRST, IN, OUT and LIMIT control movement of 
data to and from the circular buffer. 

Data is transmitted in physical record units; their size is determined by the hardware device. For example, 
rotating mass storage has an inherent PRU size of 64 CM words; binary mode magnetic tape files in SI for- 
mat are assigned a PRU size of 512 words. 

FIRST and LIMIT never vary during an I/O operation; they permanently indicate buffer limits to the user and 
the operating system. 

The program that puts data into the buffer varies IN, and the program that takes it out varies OUT. During 
reading, the operating system varies IN as it fills the buffer; and the user varies OUT as he removes data from 
the buffer. During writing, the user varies IN as he fills the buffer with data, and the system varies OUT as 
it removes data from the buffer and writes it out. 

The user cannot vary IN or OUT automatically except when using READIN and WRITOUT functions. To 
change these pointers within the program a new value is inserted into lfn + 2 (IN) or lfn + 3 (OUT). For 
convenience, the words containing IN and OUT contain no other items, eliminating the need for a masking 
operation. The system dynamically checks the values of IN and OUT during data transfers, making continuous 

read or write possible. 

If IN = OUT, the buffer is empty; this is the initial condition. If IN> OUT, the area from OUT to IN - 
1 contains available data. If OUT> IN, the area from OUT to LIMIT - 1 contains the first part of the 
available data, and the area from FIRST to IN - 1 contains the balance. 

To begin buffering, a READ function may be issued. One or more PRUs of data are put into the buffer 
beginning at IN, resetting IN to one more than the address of the last word filled after each PRU is read. 
Data may be processed from the buffer beginning with the word at OUT, and going as far as necessary, but 
not beyond IN — 1. The user must then set OUT to one more than the address of the last word taken from 
the buffer. He sets OUT = IN to indicate that the buffer is empty. 

When a READ macro request is issued, if the buffer is inactive and a read is not in process, CPC determines 
how much free space is in the buffer. If OUT > IN, OUT - IN words are free. If IN> OUT, (LIMIT - IN) 
+ (OUT - FIRST) words are free. The system subtracts 1 from the number of free words, because it never 
must fill the last word since it would result in IN=OUT and give a false empty buffer condition. If the 
number of free words minus 1 is less than the PRU size, CPC does not issue a physical read request; control 
is returned normally. 

The example below illustrates the use of IN and OUT pointers. Speed of operation is not considered; simul- 
taneous processing and physical I/O are not attempted. The initial buffer pointer position is: 

FIRST = BCBUF 
IN = BCBUF 
OUT = BCBUF 
LIMIT = BCBUF + 500 
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The user issues a READ with recall request. Ignoring the possibilities of an end-of-partition, the system reads 
as many PRUs as possible (if PRU size is 64 words, 7 x 64 = 448 words) and leaves the pointers: 

FIRST = BCBUF 
IN = BCBUF + 448 
OUT = BCBUF 
LIMIT = BCBUF + 500 

The user is processing items of 110 words. He takes four items from the buffer, leaving the pointers: 

FIRST = BCBUF 
IN = BCBUF + 448 
OUT = BCBUF + 440 
LIMIT = BCBUF + 500 

The user issues another READ request since the buffer does not contain a complete item. The system is aware 
that IN> OUT, so that vacant space is LIMIT - IN + OUT - FIRST = 492 words; since it must not fill the 
last word, it must read fewer than 492 words. 

The nearest lower multiple of 64 is 7 x 64 = 448, so the system reads 52 words into IN through LIMIT - 1, 
and then 396 more words into FIRST through FIRST + 395. It then resets IN so that the pointers look like: 

FIRST = BCBUF 
IN = BCBUF + 396 
OUT = BCBUF + 440 
LIMIT = BCBUF + 500 

The system has just used the circular feature of the buffer; now the user must do so. The next time he wants 
an item, he takes the first 60 words from OUT through LIMIT — 1 and the remaining 50 from FIRST through 
FIRST + 49. Then he resets OUT, making the pointers: 

FIRST = BCBUF 
IN = BCBUF + 396 
OUT = BCBUF + 50 
LIMIT = BCBUF + 500 

On input, this can continue indefinitely, with OUT following IN, around the buffer. The system stops on 
encountering an end-of-record or end-of-partition, and sets the code and status bits accordingly. The system 
may, or may not, have read data before the end-of-record; so it is up to the user to examine the pointers 
and/or process the data before taking end-of-record or end-of-file action. 

In writing, the process is similar, but the roles are reversed. The user puts information into the buffer and 
resets IN; and when he calls the system, it removes information from the buffer and resets OUT. For writing, 
the system removes data in physical record units and empties the buffer if possible. The user must be careful 
not to overfill the buffer; IN must not become equal to OUT. During the process of emptying the buffer, 
the operating system resets OUT after each PRU has been written and checked for errors. 
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ESTABLISHING OWNCODE ROUTINES 

The EOI address and error address fields in word 9 fifn + 10) of the FET define user-supplied routines. CPC | 
calls these routines when the UP or EP bits are set. 

An OWNCODE routine should be set up like a closed subroutine with execution beginning in the second word 
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OWNCODE routine, putting the contents of the first word of the FET into register XI, and branching to the 
second word of the OWNCODE routine. Upon entry of the OWNCODE routine, the FET pointers are left \ 
positioned after the last good write operation and the file positioned after the bad PRU. 

Termination of an OWNCODE routine by a branch to its first word causes a branch to the point in the pro- 
gram to which CPC would have returned if the OWNCODE routine had not been called. 

Although CPC clears status bits in the first word of the FET before the OWNCODE routine is called, the 
contents of this word can be examined in register XI. All registers used in the main program except Al, 
XI, A6, and X6 are saved and restored by CPC. 

TAPE LABEL PROCESSING 

The label processing that occurs for magnetic tapes is indicated by the XL bit setting, bit 41 of the second 
word (lfn + 1) of the FET. Extended label processing is possible only when this bit is set. An explicit | 

open is required. 

When the bit is off, the system generates output data and checks input data only for required ANSI, Z for- 
mat, and Y (3000 series) format labels. Labels that are processed by standard processing (excluding Y labels) 
are label types VOL1, HDR1, EOF1, and EOV1. Default values are written if the user does not specity 
otherwise. 

Checking of the VOL1 label of ANSI or Z formats ensures that the VSN requested for the job is the one 
assigned. 

STANDARD LABEL PROCESSING 

Only standard labels are processed when the XL bit is off. Any existing optional labels will be ignored. 

If the FET for the file is at least 13 words long, words 10-13 Qfn + 11 through lfn + 14) hold file header | 
label data in the following format. 
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59 


47 


29 


23 




17 





First 10 Characters of Label Name 


Last 7 Characters of Label Name 


Position Number 


Edition Number 


Retention Cycle 


Creation Date 


Multi-File Set Name 




Volume Number 





lfn+1 1 



lfn+12 



lfn+1 3 



lfn+1 4 



When input tapes are read, any user information in these fields is compared with that written in the HDR1 
label on the tape before the file is opened. A discrepancy in a label field stops job processing until the oper- 
ator takes action to continue it. If a field is not specified in the FET, any value on the tape HDR1 label is 
accepted. This checking cannot be done with an FET of less than 13 words, but any labeled tape will be 
accepted for processing. 

j When output tapes are opened, any information in words 10-13 (Ifn + 11 through lfn + 14) is used to create 
the HDR1 label for the file. Otherwise, default values are written. If two OPEN functions with rewind are 
performed, the system retains the information written the first time. Thus, a label area supplies the label 
information regardless of which programs run afterwards. 

LABEL MACRO FOR FET FIELDS 

\ Fields in words 10-13 (lfn + 11 through lfn + 14) of the FET can be set for standard label processing by means 
of the LABEL macro. This macro must follow immediately the macro creating the FET to which it pertains. 
The LABEL macro generates data for VOL1 and HDR1 labels but does not directly cause any action on the 
file. 



lfn LABEL 

lfn 

labname 

ed 
ret 

create 

vol 



labname ,ed,ret,create,vol,mfn,pos 

Logical file name used in FET creating macro. 

Label name or file identification of 1-17 characters; default is 17 blank characters. 

Edition number specifying file version of 1-2 decimal digits; default is 01. 

Retention indicator indicating the 1-3 digit decimal number of days the file is to be 
protected against accidental destruction; default is installation parameter. 

Creation data in format of 2 digits for year and 3 digits for day(yyddd); default is 
current date. 

1-4 decimal digits indicating volume within a multi-volume set; default is 0001. 
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mfn 



Multi-file name of 1-6 characters indicating the set to which lfn belongs; default is 



V\tr\or%7 TflrA 

- ■"-■*■ X.J (MlVi 



DOS 



Position number of 1-3 decimal digits indicating position of file lfn in multi-file set 
mfn; default is 000. 



The macro expansion results in display code values with binary zero fill for all parameters given. If a parameter 
is absent from the macro, it is binary zero filled. Character fields are left justified; numeric fields are right 
justified. 

When a file header label is written subsequently using the FET fields, default values are assigned for any field 
containing binary zero. On the tape, character fields are display code blank filled and numeric fields are display 
code zero filled. The fields, as written on the tape, are returned to the FET. 

When the information in the FET is used to check existing labels, binary zero fill characters will be converted 
to the display code blank appropriate for character fields or display code zero for numeric fields before com- 
parison is made. Fields in the FET containing all binary zeros are not compared. Checking procedures com- 
pare fields in the FET with those on the tape; not all fields in the FET need be specified; neither must the 
FET contain a value for all fields written on the tape. 

If the header label on the tape mounted does not match the FET fields, the operator can attempt to locate 
the correct tape and assign it to the job, or accept the mounted tape with non-matching label fields. If the 
mounted tape is accepted, the values returned to the FET will reflect the header label on that tape. 



EXTENDED LABEL PROCESSING 

When the XL bit is set, a user label buffer, rather than the FET, is used to hold labels for processing. The 
system processes the required labels, and the user may process optional labels in the buffer. 

ttiiff*»r 1r»r.otif\ti mnct K*» HAfinoH in \ur\rA Ifl fifn + \\\ nf thff flip PPT ac fnllmi/c* 

LTU11V1 1WUUV11 AllVtSfc W UV.iUVW *Jta ». V* «» X ^* lull .& *. I w» **»r ^^^v m. m^ «. uw .wuwuv 



59 



35 



17 



Label Error Code 



Length of 
Label Buffer 



FWAof 
Label Buffer 



Within the buffer, each label must be preceded by a status word. 
59 47 35 23 



11 











Characters 
in Label 



Only bits 0-11 should be set by the user to show the number of characters in the label. Remaining fields are 
set and used by the label processor. The last label should be followed by the status word containing zeros in 
bits 0-11. 
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Each label in the buffer appears, in display code, with the same format it has on the tape. Specific label 
field characteristics are discussed with Tape Labels in section 3. 

When input tapes are read, the label processor searches the buffer for a HDR1 label. Any label information 
in the buffer is compared with that on the tape; any differences will require operator action. The system 
validates only the HDR1 label; other labels are the user's responsibility. If a HDR1 label in the buffer contains 
binary zero in any field, no label checking is done on that field. After an OPEN function is issued, all labels 
read by the system are delivered to the buffer, beginning with VOL1. 

When output tapes are generated, any user labels to be written must be present in the label buffer when an 
OPEN or CLOSE function is issued. The buffer may, but need not, include the system required labels. The 
operating system will generate the required labels if they are not present in the label buffer. VOL1 labels in 
the label buffer will be ignored; HDR1 labels in the label buffer will be used if they are appropriate at that 
point in file processing. EOF1 or EOV1 labels in the label buffer will be used if they are present when the 
CLOSE function is issued. 

| For multi-file set processing with the XL bit set and calls to the COMPASS macro POSMF, word 10 (lfn +11) 
of the FET must point a label buffer. One of the first entries in the buffer must be a formatted HDR1 label 
with the multi-file name in the set identifier field. The position number field in the label has 4 digits; a 
position number of 9999 is required to write a label. Labels are always written at the end of all existing files 
in the muiti-fiie set. 
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COMPASS INTERFACE WITH OPERATING SYSTEM 



USER/SYSTEM COMMUNICATION 

A user program can request action by another part of the operating system in several ways: 

A CDC CYBER Record Manager macro can be called to create or manipulate a file. This results in a 
call to other operating system functions. 

A file action macro can be called. This results in a call to central program control (CPC) which posts 
a request in RA+1 to communicate with Monitor. 

The system communication routine SYS= can be called through various macros. 

Central processor subroutine CPC can be called through a return jump instruction. CPC then communi- 
cates with Monitor. 

A request for PP program execution or system action can be placed in location RA+1 of the user field 
length to communicate directly with Monitor (MTR). 

These requests are necessary to perform all file action such as opening, closing, reading, or writing a file, in 
addition to receiving information such as current time or date from the system. 

BASIC COMMUNICATION: RA+1 REQUESTS 

All requests from the user program to the system are made through RA+1 of the user program, which is 
initialized to zero. The system Monitor frequently examines RA+1 during program execution. If RA+1 is not 
zero, Monitor assumes that the contents are a request for a PP program or a system action, and initiates request 
processing. Executing an XJ instruction immediately after setting RA+1 non-zero speeds up processing. Bit 
59 of RA+66 is set if the XJ hardware is available. When Monitor processing is complete, RA+1 is reset to 
zero. The requests to Monitor must be in the general format: 

Bit 42-59 3 display code characters of a PP program name. 

Bit 40 1 if automatic recall is requested. With automatic recall, control is not returned to the 

calling program until the request is executed. If automatic recall is not requested, the user 
program must determine whether or not the request is complete by checking a status word. 

Bit 36-39 Zero. 

Bit 0-35 Parameters that are required by the particular function being requested. 

The user has the option of setting RA+1 directly, or calling a system or file action macro that sets it. If the user 
sets it directly, the format must conform to that shown above. 

When Monitor accepts the request, it fills location RA+1 with zeros. For all requests except RCL, TIM, ABT, or 
END, the zero means only that Monitor has accepted the request and has no relation to whether the requested 
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task is complete. A user program posts an RA+1 request, then loops until that location is zero, before proceeding 
with other code. The user should make sure that RA+1 is clear before issuing a request. 

Task completion normally is noted by the change of bit in a status word from to 1. The address of the 
status word must be greater than RA+1 and less than RA+FL! For requests made with automatic recall, the com- 
plete status bit is always set to 1 before control returns to the program, as explained below. Bits 0-17 of the 
RA+1 request points to the status word. For file action requests, this status word is the first word of the FET 
for that file. 

RECALL CONCEPT 

A recall request issued in a program causes the central processor assigned to that job to be relinquished tem- 
porarily. The length of time that the job leaves the processor depends on whether periodic or automatic recall 
was requested. During the amount of elapsed time before the job is reassigned, the central processor is also 
dependent on the relative priority of the job in the system, but jobs in recall are among the first considered 
by the scheduling routines. 

Periodic recall puts a job in recall status for a short period of time that depends on other Monitor activity. Mon- 
itor reschedules the job when any PP program has completed processing for that job. 

Automatic recall (auto recall) causes the job to relinquish control of the central processor for the time required to 
execute a request peripheral processor or Monitor function. The job remains in recall until after Monitor detects 
a. status bit change to a word in the user field length which is set when the peripheral processor completes its task. 
For file action requests, the complete bit is bit of the first word of the FET for the file. For other request, the 
address of the status word is specified by the user, and must be greater than RA+1 and less than RA+FL. 

With programs using recall whenever appropriate, central processor time for a job is minimized and overall system 
central processor use is improved. If a program cannot proceed until a requested task is complete, it can allow 
Monitor to assign the central processor to another job until such time as the task is complete. Recall is particu- 
larly useful when input/output tasks are considered. A programmer can request recall in four ways: 

RCL request to Monitor through program location RA+1 . 

PP program call in RA+1 with recall bit set. 

RECALL macro request. 

File action macro with recall parameter. Any non-blank character establishes the recall parameter. R or 
RECALL can, but need not, be used. 

Central processor programs can post an RA+1 request with the display code characters RCL in bits 42-59 and 
obtain periodic or auto recall depending on the remainder of the request. Periodic recall results from RCL in bits 
42-59 with bits 0-41 containing all zeros. Automatic recall is obtained with bit 40 set to 1 and bits 0-17 con- 
taining an address of a word in the user field length which has in bit 0. A PP program is expected to set bit 
of the parameter word to 1 when its task is complete. If bit is set to 1 when the RA+1 request is posted, Mon- 
itor makes RCL a non-operation. For other (PP) RA+1 calls with recall, PP Monitor checks the completion bit 
after the job is in auto-recall. 

The RECALL macro results in periodic recall when no parameter list is given with the macro. If a file name is 
specified, automatic recall is produced. No separate status word is involved with periodic recall. The user pro- 
gram must check the code and status field of the FET for complete status to determine whether program execu- 
tion can continue. The RECALL macro will not exit to OWNCODE routines. 
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When file action macros are used, automatic recall is requested by a recall parameter. Any non-blank character or 
string of characters can appear as this parameter. The characters RECALL are often used, but a single arbitrary 

CuaiaCtCr iS SUiiiCiCut. 

The recall parameter can be specified for all the read and write macros except READIN and WRITOUT. However 
the internal execution of these two macros ensures that automatic recall is always in effect. 



Before CPC can honor a file action request, the file environment table (FET) must have been established for the 
file to be processed. Calling sequences to CPC can be generated either directly or through the use of system 
macro statements. 

The user communicates with CPC through macro requests and the FET. Communication with the operating sys- 
tem is handled by CPC through setting and checking RA+1. CPC may also cause the execution of one or more 
user OWNCODE subroutines for which addresses are specified in word 9 (lfn + 10) of the FET. 

A normal exit is made from CPC if the request is honored and no error condition occurs. Register XI contains 
zero upon exit. If the status is other than request completed, register XI contains the code and status bits set 
in the FET before the OWNCODE routine was entered. 

Automatic recall should be used when the program makes an I/O or system action request but cannot proceed 
until that request is satisfied. Control is not returned to the program until that request is satisfied. Periodic recall 
can be used when the program is waiting for any one of several requests to be satisfied. In this case, the program 
is activated periodically so that the user can determine whether or not the program can proceed. 

CALLING SEQUENCE TO CPC 

Format of the calling sequence to the CPC subroutine: 

59 41 39 35 29 17 



X 


RJ 


CPC 


yyy 


n 


r 




w 


z 



RJ Return jump instruction 

CPC Entry point to the CPC subroutine 

r Set if auto recall requested 

If n=0 indicating a file action request: 

yyy Display code characters CIO. 

000001 Only file recall is desired. Display code characters RCL are generated in RA+1. OWNCODE 
routines are executed if appropriate. 

000002 For most read or write functions. A function in progress is not reissued by CPC. When the file 
becomes inactive. CPC issues the next request, Display code characters CIO are generated. 
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000003 For all other functions. When the file becomes inactive, CPC issues the request. Display 
code characters CIO are generated. 

000004 Equivalent to 000003; included only for compatibility with previous systems, 
or 000007 



x 
z 
w 



SA1 base address of FET. 

Request code (one of the CIO codes listed in section 5). 

Skip count for SKIPF, SKIPB, and BKSPRU; otherwise ignored. 

If n=l indicating other than a file action request: 

yyy Display-coded name of the called PP program 

x Not relevant 

z, w Parameters as required 

For file action requests, CPC places the CIO function request code in the code and status field of the FET before 
writing the request in RA+1. Bits not specified in the calling sequence are reserved for future system use. A file 
action request to Monitor is formatted by CPC in RA+1 as follows: 



59 



41 39 35 



17 



yyy 





r 




w 


address of FET 



A system action request to Monitor is formatted in RA+1 as follows: 
59 41 39 35 



17 



yyy 


1 


r 




w 


z 



CPC EXECUTION 

Bit 41 of word 2 is set to 1 in the calling sequence of all requests except file action requests. This bit is 
actually a flag for CPC and has no relevance to either Monitor or the processing PP program. The setting of 
bit 41 causes CPC to recognize that the address given in Al is not relevant, and that the word following the 
return jump to CPC contains a properly formatted request. No additional processing is done on these requests, 
except for MESSAGE. The request is simply placed in RA+1. 

A request which utilizes an FET is signalled by a value of zero in bit 41 of word 2 of the calling sequence. 
CPC will in this case, do considerable processing for the user. The processing basically consists of three steps: 
wait until the FET is inactive; process any abnormal conditions; and initiate the new request. The high order 18 
bits of word 2 in the calling sequence may contain a numerical value rather than a PP program name. These 
values are of the form 2X + Y, where X represents the ordinal in a table of PP program names, and Y is 1 or 
to indicate whether or not the FET must be inactive before processing can continue. If a PP program name 
appears in these 18 bits, CPC waits for inactive FET status before initiating the new request. 



74 
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1. Upon receipt of a file action request, CPC waits for previous activity on the specified FET to be com- 
pleted unless the Y bit is zero; CPC requests automatic recall until FET word 1 contains an odd value. 
The Y bit is zero for READ, WRITE, and OPEN requests. If the request is OPEN, the assumption is 
made that no previous activity has occurred. READ and WRITE are handled specially. 

2. If the Y bit is one, the results of the previous operation are tested. A zero in bits 9-13 of the FET 
code and status field indicates there are no abnormal conditions and processing goes to step 3. However, 

ii Oleic aie auiiuimai uuiiuiiiuns uui nu u«i>vuui: audresses aic given, ltic uunicnts Oi rci WOiu i iim"nj_; 

are saved for subsequent use as an exit parameter before processing goes to step 3. The error OWNCODE 
routine is entered if bits 9-13 have a value of 4 or higher (end-of-information or end-of-volume may also 
be present); the EOI OWNCODE is entered if the value is less than four. An OWNCODE routine is 
entered as though a return jump instruction was issued. Execution begins at the start address plus 1 . 
An exit from the routine will, however, return control to the main program, not to CPC. The request 
which triggered this activity may or may not have been issued; and the program must decide whether to 
re-issue it. An OWNCODE routine is entered with XI containing word 1 of the FET complete with bits 
indicating abnormal conditions; FET word 1 itself has been cleared of the abnormal bits. 

3. If the new request is for READ, WRITE or REWRITE, and the FET is already active with the same 
request, CPC exits, it would be pointless to stop the I/O merely to reactivate it. If, however, the FET 
is inactive or active with a different request, steps 1 and 2 above are executed as a subroutine. If the 
new request is a READ, an additional check is made for end-of-logical record or end-of-partition status 

on the previous request; the new READ is ignored and an exit taken from CPC if either status is present. 
If a program is reading without recall, the user is forced to clear the logical record bit at the end of 
each record to ensure that he is aware of the end-of-logical record. 

CPC now makes preparations to communicate the new request to the system. The new request code from 
word 2 of the calling sequence is inserted into bits 0-17 of FET word 1 at lfn + 0; the old mode bit (bit 1) 
is not disturbed. The RA+1 request is formatted from the following items. 

PP program name obtained from the CPC calling sequence. 

Setting of the auto-recall bit in the calling sequence. 

First word address of the FET. 

RA+1 is set and CPC waits for a zero quantity to re-appear. If the auto-recall bit was set, CPC executes step 
2 above as a subroutine. CPC then exits with XI containing zero if no abnormal conditions were encountered; 
otherwise, XI contains the value from FET word 1 (lfn + 0). 



CPC saves and restores all registers except Al, A6, XI and X6. 
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LOCATIONS RA THROUGH RA+100 

The first 100 octal locations within a user field length are used for communication between the operating 
system and a user job. An additional word, RA+100, is reserved for loading purposes. Many of the words 
are applicable only to internal operating system routines, and can be ignored by the programmer. Several of 
the fields in this area are useful in COMPASS programming when macros are called. 

Figure 7-1 shows the communication area. Fields within it are: 

R Dependent job string recheck bit 

A Job swapout to operator action queue (1 = job will be placed under operation queue upon swapout 
regardless of job origin) 

I O Comment from operator (CFO) flag (1 = accept comment from operator) 

T Storage move flag (1 = move being attempted) 

P Pause flag; when set, program will halt until the operator takes action and clears the flag with GO 
command; if MESSAGE is called when P is set, the message will flash on the B display 

SS Sense switches i-6 set by SWITCH cards or by operator command ONSWn 

M If set, system has CMU hardware available for use 

L library/file flag (1 = name is library name) 

X If set, system has the XJ instruction available for use 

JO JOB ORIGIN (0=system, l=central site batch, 2=remote batch, and 3=terminal) 

D RSS flag for DIS (see NOS/BE Operator's Guide) 

C LOAD complete flag set when load requested by LOADREQ is finished 

Locations RA+70 through RA+77 contain the control statement currently being processed. When a job step 
begins, the control statement verb is placed in bits 18-59 of RA+64, left-justified and binary-zero filled. 
The parameters are placed in bits 18-59 of RA+2 through RA+52, one parameter per word, left-justified 
and binary-zero filled. A parameter longer than seven characters is continued in the next word. A zero word 
marks the end of the parameter list. Bits 0-3 of each parameter word contain one of the following codes 
which indicates the separator or terminator that followed the parameter. 



00 


Continuation 


04 


( 


10 


» 


ni 


» 


05 


X 


16 


OuiCr 


02 


= 


06 


- 


17 


.or) 


03 


/ 
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The number of words containing parameters (0-51) is placed in bits 0-17 of RA+64. 

Example: 

This example shows a user field length containing a fictitious control statement verb and parameters to illustrate 
separator and terminator codes. The statement ABC(Pl=LGO/FILE34*B,P3+09.2$-$;2( ,P5%LAST) appears in 







Display Code 


Control 


Location 


Contents (Octal) 


Equivalent 


Character 


RA+ 2 


2034 0000 0000 0000 0002 


P1:::::::B 


= 


RA+ 3 


1407 1700 0000 0000 0003 


LGO::::::C 


/ 


RA+ 4 


0611 1405 3637 4700 0000 


FILE34*::: 


continued 


RA+ 5 


0200 0000 0000 0000 0001 


B::::::::A 


» 


RA+ 6 


2036 0000 0000 0000 0005 


P3:::::::E 


+ 


RA+ 7 


3344 5735 5300 5500 0006 


09.2$: ::F 


- 


RA+10 


5300 0000 0000 0000 0010 


$::::::::H 


» 


RA+11 


3500 0000 0000 0000 0004 


2::::::::D 


( 


RA+12 


0000 0000 0000 0000 0001 


:::::::::A 


9 


RA+13 


2040 0000 0000 0000 0016 


P5:::::::N 


other 


RA+14 


1401 2324 0000 0000 0017 


LAST:::::0 


terminator 


RA+15 


0000 0000 0000 0000 0000 






RA+64 


0102 0300 0000 0000 0013 


ABC:- :-K 




RA+70 


5555 5501 0203 5120 5534 


ABC(P 1 




RA+71 


5554 1407 1755 5006 1114 


=LGO /FIL 




RA+72 


0536 3747 0256 2036 4533 


E34*B,P3+0 




RA+73 


4453 5735 5353 0055 5346 


9$.2$$: $- 




RA+74 


5353 5353 7735 5155 5620 


$$$$;2( ,P 




RA+75 


4055 6355 1455 0155 2355 


5 % L A S 




RA+76 


2455 5255 0000 0000 0000 


T ):::::: 




RA+77 


0000 0000 0000 0000 0000 







When a control statement is read in response to a CONTRLC macro with the crack parameter, the same 
interpretation takes place except the verb is taken as the first parameter and placed in RA+2. Bits 18-59 
of RA+64 are not altered but bits 0-17 show the parameter word count of the new statement. 

Location RA+1 is set by the user, or macros called by the user, when a function is requested from the 
operating system. 
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59 



RA+O 



RA+1 



RA+2 



RA+53 



RA+54 



RA+63 



RA+64 



RA+65 



RA+66 



RA+67 



RA+70 



RA+76 



M 



RA+100 



35 29 23 17 



AO 



11 5 



SS 



User/System Interface 



Parameters 
(left justified) 



(Reserved) ICode 



1AJ Bootstrap for Absolute Programs 



File/Library Name 



LWA+1 of Loadable 
Area in ECS 



FWA of Loadable 
Area in ECS 



JO 



Number of 
Parameter Words, 
starting in RA+2 



LWA+1 of Loadable 
Area in CM 



FWA of Loadable 
Area in CM 



Control Statement Image 
(Replaced by Operator Message If Bit Set and CFO Type-In) 



4 



Reserved for Loading Purposes 



Figure 7-1. Communication Area RA through RA+100 



7-8 



60493800 E 



CDC CYBER RECORD MANAGER MACROS 

CDC CYBER Record Manager consists of a group of routines providing input/output facilities common to 
several products. User programs written in COBOL or FORTRAN can communicate with the Record Manager 
through compiler language calls; COMPASS programmers communicate through the macros listed below. 

CDC CYBER Record Manager supports the following file organizations. 

Sequential files in physical order 

Word addressable files on mass storage with continuous non-blocked data 

Indexed sequential files in which records are physically and logically in order by symbolic keys 

Direct access files containing records in fixed length blocks; record location is determined by hashing a 
key to identify a block 

Actual key files in which each record is stored in a location specified by the key associated with that 
record 

The operating system considers all the above types of organization as sequential files. None have name/number 
indexes similar to those discussed elsewhere in this manual. 

The record and block formats supported by CDC CYBER Record Manager are listed below. 

Record 

Type Description 

F Fixed length records. 

D Record length is given as a character count, in decimal, by a length field contained 

within the record. 

R Record terminated by a record mark character specified by the user. 

T Record consists of a fixed length header followed by a variable number of fixed 

length trailers, header contains a trailer count field in decimal. 

U Record length is defined by the user for each read or write. 

W Record length is contained in a control word prefixed to the record by CDC CYBER 

Record Manager. 

Z Record is terminated by a 12-bit zero byte in the low order byte position of a 60-bit 

word. Binary zero fill can precede the record terminator; thus, the record an end in 12 to 
66 bits of zero. 

S Record consists of zero or more blocks of a fixed size followed by a terminating block of 

less than the fixed size. These S records are equivalent to the system-logical-records 
discussed elsewhere in this manual. 
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Block 

Type Description 

K All blocks contain a fixed number of records; the last block can be shorter. 

C All blocks contain a fixed number of characters; last block can be shorter. 

E All blocks contain an integral number of records; block sizes may vary up to a fixed 

maximum number of characters. 

I A control word is prefixed to each block. 

COMPASS macros used by CDC CYBER Record Manager reside in the system text overlay IOTEXT; if system 
defaults are installed, macros also reside in overlay SYSTEXT. General macro names and functions are given 
below; specific variants of these macros are detailed in the Record Manager manuals along with other product 
capabilities. 

Macro Function 

File Creation and Maintenance Macros: 

FILE Creates file information table (FIT) 

FETCH Retrieves value of any field in FIT 

STORE Sets value in field of FIT 

File Initialization and Termination Macros: 

OPENM Prepares a file for processing; initiates label processing 

CLOSEM Terminates file processing; initiates label processing 

Data Transfer Macros: 

GET Transfers data from file to working storage area 

GETP Retrieves a portiori of a record from a file 

PUT Transfers data from working storage area to a file 

PUTP Transfers a portion of a record to a file 

CHECK Determines completion status of I/O operations 

File Positioning Macros: 

SKIP Repositions file backward or forward 

REWINDM Rewinds volume to begmning-of-information 

SEEK Provides overlap between I/O and processing by positioning while processing 



| 7-10 
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Macro Function 

File Updating Macros: 

DELETE Deletes record from tile 

REPLACE Replaces record in file 

Boundary Condition Macros: 

WTMK Records a tape mark on a tape file 

WEOR Records end of a section 

ENDFILE Records end of a partition 

A FILE control statement equivalent to the FILE macro also is available. 

Files created by CPC can be read or written by CDC CYBER Record Manager once they are properly described 
to Record Manager. Similarly, a file created by Record Manager can be read by CPC if the file structure con- 
forms to that required by READ and WRITE macros. A file should not be manipulated by both Record 
Manager and CPC within a given run. 

The reference manuals for Record Manager contain details of its use. CDC CYBER Record Manager macros 
are not further discussed in this manual. 

SYSTEM COMMUNICATION MACROS 

Communication between the operating system and a program written in COMPASS is provided by the following 
macros. These macros exist within all of the COMPASS system text overlays CPCTEXT, IOTEXT, SYSTEXT, 
SCPTEXT, and TXT6RM. 

SYSCOM MACRO 

This macro defines standard symbols and macros. 

SYSCOM Bl 

If Bl is present, the COMPASS pseudo instruction Bl=l is generated. This informs COMPASS that register Bl 
contains 1 throughout the program, and can affect the code produced by the R= pseudo instruction. The 
micro MODEL is defined as the two characters 74. The symbols listed below are made available for use by 
the user program. 

RA.SSW = Sense switches in bits 11-6. 

RA.MTR = 1 System monitor request register. 

RA.ARG = 2 Start of control statement argument list. 

RA.PGN = 64B Bits 59-18 = program name. 

RA.ACT = 64B Bits 17-00 = argument count. 

RA.LWP = 65B Last word pointers for overlay load. 

RA.CMU = 65B Compare move unit flag (bit 59) 
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RA.FWP = 66B First word pointers for overlay load. 

RA.CEJ = 66B Bit 59 = central exchange jump enable flag. 

RA.LDR = 67B Loader communication word. 

RA.CCD = 70B First word of control card image. 

RA.ORG = 100B Origin of overlay header word for absolute programs. 

SYSTEM MACRO 

This macro is used for issuing system requests for which no specific system macro is provided. It is also used 
by many of the system action macros. Registers XI, X2, X6, Al, and A6 are destroyed during macro 
execution and should not be used as parameters. 

SYSTEM name,recall,pj,p2 
The SYSTEM macro generates the following in X6 and issues a return jump to SYS=. 

59 41 39 35 17 



Name 





r 





P 2 


P1 



Name Display-coded name of PP program 

r Optional recall parameter 

Pi First parameter to PP program 

?2 Second parameter to PP program 

The value of pj or p 2 cannot exceed 377777 (octal). 

COMMON USES OF SYSTEM MACRO 

ABS is a system program used by a central processor program to dump absolute core. This request is done 
by issuing a call to PP routine ABS. The call to ABS can be issued with or without auto-recall either by 
using the SYSTEM macro or by placing the call in RA+1 directly. If auto-recall is not used, the program 
uses: 

SYSTEM ABS„from,thru. 

If auto-recall is used, the programmer establishes a parameter word that contains the thru and from values. 
The format of the parameter word is: 

Bit 11-0 Zero-filled, bit zero used as complete bit 

Bit 29-12 Thru value 

Bit 47-30 From value 
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The central processor program then uses: 

SYSTEM ABS,R,pointer to parameter word. 

DMP is a system program used by a central processor program to dump specified portions of field length. 
This request is done by issuing a call to PP routine DMP. The call to DMP can be issued with or without 
auto-recall either by using the SYSTEM macro or by placing the call in RA+1 directly. If auto-recall is not 

nepii irta nrArtrarn hcac ■ 

SYSTEM DMP„thru,from. 

If auto-recall is used, the programmer establishes a parameter word that contains the thru and from values. 
The format of the parameter word is: 

Bit 1 1-0 Zero filled, bit zero used as complete bit 

Bit 29-12 Thru value 

Bit 47-30 From value 

The central processor program then uses: 

SYSTEM DMP,R,pointer to the parameter word 



REGISTER SAVE/RESTORE FUNCTION 

To save or restore registers, a program can issue a call for an XJR function through RA+1. This special call is 
processed entirely by central monitor (CPMTR). 

To issue the XJR call the program can use the SYSTEM macro as follows: 

SYSTEM XJR,R,addr,l 

XJR Name of system process. 

R Recall parameter. This call must be made with recall. 

addr Address of a 16-word parameter area to contain the exchange package. The format of 

this area is described with the DMP control statement. 

1 Save function requested; if omitted restore requested. 

For the 1 save function, CPMTR saves the job's current exchange package in the parameter area. Registers XI, 
X2, X6, Al and A6 are destroyed by the SYSTEM macro and by the subroutine SYS=. 
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For the restore function, CPMTR sets up an exchange package containing X0-X7, B1-B7, A0-A7 and P from 
the parameter area. RA, FL, EM, RE, FE and MA registers come from the job's current exchange package. 
The result, then, replaces the job's current exchange package. Execution resumes at the address pointed to by 
P in the parameter area. This is the only safe way to set registers Al through A7 to values outside the 
current field length. 

INTEGER DIVIDE Opdefs 

These opdefs provide for division of 48-bit integers. 

IXi Xj/Xk 
IXi Xj/Xk,Bn 

The integer quotient (fraction truncated) result in register Xi has sign extension in bits 5948. The first form 
destroys register B7, and the second form destroys register Bn. The contents of Xj and Xk are the floating 
point normalized operands. 

SYSTEM ACTION MACROS 

The macros described in this section allow the user to receive status information from the operating system 
and to change some job parameters. Calling these macros from a COMPASS central processor program results 
in RA+1 requests for Monitor functions or PP programs. 

The macros reside in the following COMPASS system text overlays: CPCTEXT, IOTEXT, SYSTEXT, and 
SCPTEXT. All of the system action request macros call the system communication subroutine SYS= except 
as noted in the individual macro descriptions; these macros do not call CPC. The subroutine SYS= resides in 
the library NUCLEUS. 

Generally, the system action macros use registers alike; only registers XI, X6, Al, and A6 are destroyed. All 
registers except XI and X6 can be used as parameters. Register XI can be used as the first, but not as the 
second, parameter. Register X6 cannot be used as a parameter. Exceptions are noted in the macro 
descriptions. 

ENDING PROGRAMS 

Programs can be ended by one of two macros: 

ABORT Abnormal termination 

ENDRUN Normal termination 

These functions result in a Monitor request for ABT and END, respectively; they are executed immediately by 
Monitor. 

ABORT MACRO 

The ABORT macro causes abrupt termination of the present program and if an EXIT, EXIT(U) or EXIT(S) 
does not appear among the remaining control statements, causes job termination. 
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ABORT Ifn.p^p,, 



lfn 



Position allows for SCOPE 2 compatibility. Any non-blank value in this field causes 
an assembly error under NOS/BE. 



Pi 



?2 



Optional parameter. Characters ND in this field suppress the DMPX user dump. 

liaiavicu livyiyvmi Auppivu uiv x^irxj. ^t uowi uumu aiiu L-aust ^unnui DLaLtmcin piu" 

cessing to be resumed only after an EXIT(S) control statement has been encountered. 
EXIT, EXIT(C), and EXIT(U) control statements are skipped. Any other non-blank 
value in this field is ignored. 

Optional parameter. Character S in this field causes control statement processing to 
be resumed only after an EXIT(S) control statement is encountered. EXIT, EXIT(C), 
and EXIT(U) control statements are skipped. Any other non-blank value in this 
field is ignored. 



The DMPX user dump produced when pi is blank (or any non-blank value except ND or NODUMP) shows the 
contents of the exchange package, contents of the operating registers, and memory locations near the location 
of the ABORT call. 

The effect of the various EXIT control statements on job processing and DMPX production after an ABORT 
call is shown in the following chart. Resume indicates that the statements following EXIT are executed; skip 
indicates that the following statements are not executed. 



ABORT 


Call 


DMPX 


EXIT. 


Exrr(C) 


EXIT(S) 


EXIT(U) 


ABORT 




Yes 


Resume 


End job 


Resume 


Resume 


ABORT 


,ND 


No 


Resume 


End job 


Resume 


Resume 


ABORT 


,ND,S 


No 


Skip 


Skip 


Resume 


Skip 


ABORT 


,,s 


Yes 


Skip 


Skip 


Resume 


Skip 


ABORT 


.NODUMP 


No 


Skip 


Skip 


Resume 


Skip 


ABORT 


,NODUMP,S 


No 


Skip 


Skip 


Resume 


Skip 



ENDRUN MACRO 

The ENDRUN macro is usally the last instruction to be executed in a user program. No parameters can be 
used with this request. 

ENDRUN 

Monitor causes the operating system to examine the control statements and begin processing of the next con- 
trol statement. If the next control statement contains a 7/8/9 multiple punch or is EXIT, or EXIT(S), the 
job is terminated. 
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GETMC MACRO 

The GETMC macro obtains the characteristics of the mainframe on which the user's routine is executing. 
The format of the macro is: 



GETMC addr 




addr Address of a 


word where the following information is returned. 


Bits 59-49 


Reserved for software characteristics 


Bit 48 


System assembled for 63-character set 


Bits 47-36 


ECSsize/lOOOB 


Bits 35-24 


Number of PPUs 


Bits 23-20 


Reserved for hardware characteristics 


Bits 19-18 


CDC CYBER 176 mainframe flag: 




Not a 176 

1 Type A 

2 Type B 

3 Type C 


Bit 17 


PPUs running at 2x speed (CDC CYBER 170 series only) 


Bit 16 


CDC CYBER 17x mainframe 


Bit 15 


CMU is present 


Bit 14 


CEJ/MEJ option is present 


Bit 13 


CPU has instruction stack 


Bit 12 


CPU1 is present 


Bits 11-1 


Memory size/200B 


BitO 


Completion bit 
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FIELD LENGTH REQUEST 

The amount of extended core storage or central memory assigned to a job can be changed by the MEMORY 
macro. The MEMORY macro can also be used to obtain the current ECS or central memory field length 
assigned to the job, obtain the maximum ECS or central memory field length available to the job, or release 
all ECS assigned to the job. 

Format of the MEMORY macro call: 

MEMORY type,address,recall,length,nabort 

type CM, SCM.t or blank, central memory request; ECS or LCM,t extended core storage 

memory request. 

address Address of request/reply word; if omitted an assembly error results. 

recall Optional recall parameter. If recall is specified, control is not returned to the user's 

program until the request is honored. Any non-blank parameter is acceptable. Recall 
is required on all requests for memory increases. 

length Optional parameter giving number of words of field length requested. 

nabort Optional parameter which averts a job abort if non-blank prevents job termination when 

requested field length exceeds field length defined on the job statement, or when other 
problems involving field length discrepancies occur in loading the user's job. If a non- 
blank nabort parameter is used, and an ABORT cannot be prevented, the current field 
length is returned in bits 30 through 59 of the status word. [Memory is allocated in 
portion of 100 (octal) for central memory and 1000 (octal) for ECS.] 

Format of MEMORY macro request/reply word is two 30-bit fields. 

Bits 0-29 should always contain zero when the request is issued. Bit u is set to i upon completion o± tue 
request. 

If the length parameter in the MEMORY macro call is blank, the upper 30 bits of the request/reply word 
determine the action taken. 

If bits 30-59 contain zero, the current field length of the type specified in the macro call is returned right 
justified in bits 30-59. 

If bits 30-59 contain negative zero (7777777777B) and the type parameter in the MEMORY macro call is ECS 
or LCM, all extended core storage assigned to the job is released. If a negative zero is given when the type 
parameter is not ECS or LCM, an error condition results. Also, the message MEM ARG ERROR is issued to 
the dayfile and the job is aborted. 

If bits 30-59 contain negative one (7777777776B) the maximum type field length available to the job is 
returned right justified in bits 30-59 of the request/reply word. 



tsCM and LCM are allowed for compatibility with SCOPE 2, 
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Any value, other than those described above, in bits 30-59 of the request/reply word is assumed to be the 
field length desired; and this value is requested. If the request is satisfied, the field length is returned right 
justified in bits 30-59 of the request/reply word; and bit of the request/reply word is set to 1. The system 
rounds the user's field length to the nearest 100 (octal) central memory words or 1000 (octal) ECS words 
above the requested length. 

If the request cannot be satisfied and the nabort parameter in the MEMORY macro call was not blank, the 
current field length is returned in bits 30-59 of the request/reply word, and the job continues at that field 
length. If the nabort parameter was blank, the job is aborted. 

Because system routines may read ahead, field length should not be reduced to within four words of last used 
location. 



DAYFILE MESSAGES 

A message is always placed in the control point message area and optionally entered into the job or system 
dayfile with the MESSAGE macro. The control point message area is displayed on the operator console B 
display, and the dayfiles are displayed on the operator console A display. 

The message flashes for operator attention if its first character is $ or if the pause bit is set when 
MESSAGE is called (bit 12 of word RA+0). The MESSAGE macro calls the system communication sub- 
routine MSG=. 

MESSAGE addr,display,recall 

addr First word address of the message. 

display Ordinal specifying message disposition. If omitted, default is 0. 

Enter in system and job dayfiles and control point message area. 

1 In control point message area only. 

2 Same as option 1 (for comparability with other systems). 

3 Enter in job dayfile and control point message area. 

4 Enter in CERFILE (system programs only). 

5 Dayfile accounting message (system programs only). 

6 Same as option but do not send to user's terminal. 

7 Same as option 3 but do not send to user's terminal. 

8 or more Same as option 1. 

LOCAL Display on B display and record in job dayfile. 

other 

non-blank Display on B display but do not record elsewhere. 



recall Optional recall parameter; if non-blank, MSG=constructs a status word. 
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Within the program the message must be stored in display code and should not contain any characters with display 
code values greater than 57 since these cannot be displayed on the console. Any display code value greater than 57B 
or is replaced with a blank (display code value of 55B). Maximum message length of 80 characters is established 

Wit fVio Hov/filp nrA/>ACpin(j rrviitirtA" Af\ <^!rarQpt£»rc annpor r\n &or*V\ ItrtA Aiocoorroo avf*aafHnrr Qf\ ntt*\ras+4-i*ftt £!»•*» +***** sm+aA 
uV vjj.w uujr Aj-iV pivvvMuig luwuuv -t\j wnuiuvtvij fi^pvui v^*i vuvii uitv> iixv&augwa vAvCwuxiig OO Viiaia^LVl6 div LJ. L*llVtiLt>U.. 

Those shorter than 80 characters must be terminated by a word with zeros in bits 0-1 1 . The CERFILE option is an 
exception since the message length is always six CM words. It is assumed to contain binary data so no character checks 
are made. The data is entered in the CERFILE and nowhere else. 

RPCA' i MAPfin 

RECALL causes the program to relinquish control of the central processor. The conditions that determine 
when the job regains control of the processor depends on the form of the macro used. 

Periodic recall results from: 

RECALL 

Control returns to the user program after a short period of time or when any PP program terminates processing 
for the job. Once control is regained, the user must determine whether the condition that required recall is 
still present. This form of the RECALL macro calls the system communication subroutine RCL=. 

Automatic recall results from: 

RECALL addr 

addr Address of a word (usually the first word of a FET) which has bit set to 1 before 

control returns to the user program. 

If CPCTEXT is used when addr is the first word of the FET and error or end-of-partition bits are set in the 
code and status field of the FET, control returns to a user OWNCODE routine if it exists. Such routines are 
established by setting the EP or UP bits and specifying OWNCODE addresses. If other texts are used for the 
assembly, the RECALL macro calls the system communication subroutine WNB= (wait not busy). 

Since recall may be entered when an input/output operation is initiated, the RECALL macro is needed only 
if some useful processing can be done in the time the input/output operation is being completed. 

STATUS INFORMATION 

TIME AND DATE MACROS 

The user can determine the date and time in several formats by accessing clocks kept internally by the system. 
Each of these functions calls the system communication routine SYS=. 

CLOCK Current system clock in hours, minutes, and seconds 

DATE Current date established at deadstart time when the system was loaded 

JDATE Current date in format yyddd for year and date 

RTIME Real time clock maintained by Monitor, in fractional seconds 

TIME Central processor time allowed and used by job 

IOTIME Input/output time allowed and used by job. 
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Each of these functions requires the user to identify a status word. The system returns the requested informa- 
tion before clearing location RA+1 to mark the function complete. 

The macros, and the format of the status returned, are given below. 

The system clock is that established when the operator loads the system. Display code hours, minutes, and 
seconds appear with periods and a leading blank as follows: 

CLOCK status 
59 




The date returned is that typed by the operator when the system was loaded. Its format is display code, and 
generally is mm/dd/yy for month, day, and year; this order may be changed at installation option. A 
leading and trailing blank appear. 




Date in a format suitable for calculating elapsed days is returned with JDATE. Five display code characters 
appear in the low order position; the first two digits are the year, the last three the number of the day in the 
year. 



JDATE status 



59 



29 



Zeros 


y y d d d 



The real time clock is that maintained by Monitor for purposes such as determining peripheral processor time used. 
The status word will show seconds in bits 12-35 and units of 4096ths of a second (244 9/64 microseconds) in 
bits 0-11. 



RTIME status 
59 



47 



35 



PP Queue 
Entry Count 


undefined 


Seconds Times 4096 
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The job time limit is that requested on the job statement or assigned by installation default. Central processor 
time used is shown in seconds and milliseconds. 



TIME status 
59 



35 



11 



Time Limit (Seconds) 


CP Time (Seconds) 


Milliseconds 



The 10 time limit is requested on the job statement or assigned by installation default. Used 10 time is 
shown in seconds and milliseconds. 

IOTIME status 



59 



35 



11 



10 Time Limit (Seconds) 



10 Time (Seconds) 



Milliseconds 



STATUS MACRO 

The STATUS function provides a user program with information about system resources. Two types of infor- 
mation are available depending on the value of the x parameter as described below. 

The call to this macro is: 



STATUS list,x,recall 



list 



recall 



Address of a header word containing the length of the area in which status information 
is to be returned. The status area begins at list+1. 

x = 1 maps available space on all public rotating mass storage devices. 

x = 2 returns system information concerning files assigned to the user program. 

x = 3 PRU count for a file (or files). 

x = 4 returns control point activity information to the header word. 1 

x = 5.777 reserved; 1000 to 7777 reserved for installation use. | 

Optional recall parameter; any non-blank character. 
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I Format of the header word for x = 1, 2, or 3 must be: 
59 47 35 



23 



11 



Zeros 


List Length 


Length Return 


(Reserved) 


Zeros 


a 



list Length 



Length 
Return 



Number of words, excluding this header word, to be used for return information; 
must be set by user to other than 0. 

Number of status words returned; set by operating system when list is complete. 



a Must be set to before issuing a STATUS call. 

The header word is also the auto recall reply word; when bit a becomes 1, the request is complete. 

When x=l, the system returns one word of information for each rotating mass storage device available with the 
default allocation flag set in the RBR. Format is: 



59 56 



47 



35 



23 



17 



11 






Status 


Device Type 


EST Ordinal 


Chan 


Eq 


Available PRU's 



Status 



Device Type 



EST Ordinal 

Chan 

Eq 

PRUs 



9-bit binary field: 

000 Unavailable device 

020 Mounted device 

040 Dismounted device 

060 Idled device 

Hardware mnemonic in display code: 

AH 819 disk drive 

AY 7054/844-21 disk drive 

AX ECS resident files 

AZ 7054/844-41 disk drive 

Position of entry for device in equipment status table (12-bit binary field). 

Channel number by which device can be accessed. 

Equipment (controller) number to which device is connected. 

Number of PRUs, divided by 100 octal, of space remaining on the device; value of 
7777 indicates at least 262,100 PRUs available. 
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When x=2, the status area contains one three-word entry for each file name, which should appear left-justified, 
zero-filled in the first word of each entry. If the file exists, the file name is replaced by the first three words 
of the file name table (FNT). If the file does not exist, the file name is zeroed out. Information in the 
FNT is used by some compilers. 

When x=3, the list length field in the STATUS macro list header word must specify two words for each file 
requiring size determination. The first word contains the file name, left-justified with zero fill. Upon return, 

»U« s,~ nn *+A .,-A rf i Kit" fi +U<t-s^-ii*v)t ll ^/-.ntnino tha PT3 T T ^niinf fnr fVlA fili3 
LUG SCI^LMIU WU1U, L/IL3 W UUUUgil ^,*7j ^V/lilO-lllO lAJ.^ x l\w vuuin iwi uiv a.u.v. 

When x=4, bit (complete flag) in the header word must be zero initially, and all other bits are ignored. 
The PP program STS processes the request. Upon completion, the following information is returned to the 
header word. 





59 



47 



38 35 



Short Term 
Activity Count 



Short Term Sum of active PPUs (excluding the STS program), stack results, and subsystem control 

Activity Count point wait responses. 



Bit 38 

cfo 



Bit 38 is set equal to 1 to indicate a subsystem control point long-term connect. 
Comment-from-operator flag; set equal to bit 14 of RA+O. 
Pause flag; set equal to bit 12 of RA+O. 



Although this STS request can be used by any program, it is required only by system programs involved with 
interactive debugging. 

Fl LEST AT MACRO 

The FILESTAT macro is an alternate for the STATUS macro: 

FILESTAT list.recall 
This macro is equivalent to: 

STATUS list,2,recall 

GETACT MACRO 

The GETACT macro is an alternate for the STATUS macro: 

GETACT list.recall 
This macro is equivalent to: 

STATUS list,4,recall 
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FILINFO MACRO 

The FILINFO macro provides a user program with information about a file assigned to the user's control point. 
The call to this macro is: 

FILINFO addr 

addr Address of a 5-word table to receive file information. 

Format of the header word must be: 



59 



addr 



File Name 



17 



Length 



11 



Zeros 



File Name A valid display-coded file name. 

Length Table length including the first word (should be set to 5). Must be at least 4. If 

set to 4, four words are returned. If set to 5 or more, five words are returned. 

a Must be set to before issuing a FILINFO call (will be set to 1 when the operation 

is completed). 

When the operation is completed, the table will have the following format. If the file is not assigned to the 
user's job, the table entries will be zero. 





59 


47 




29 




23 




5 


addr + 1 


Device Type 


Reserved (0) 


Status 


Ft 


addr + 2 


Eq 


Reserved (0) 


addr + 3 


NPRU 


CPRU 


addr + 4 


Reserved (0) 
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Device Type Hardware mnemonic in display code: 



AH 


819 disk drive 


AX 


ECS resident flies 


AY 


7054/844-21 disk drive 


AZ 


7054/844-41 disk drive 


LM 


Link medium file 


MT 


667 or 677 magnetic tape drive 


NT 


669 or 679 magnetic tape drive 


TR 


3691 paper tape reader 


TP 


3691 paper tape punch 


LP 


Line printer (any) 


LR 


580-12 line printer 


LS 


580-16 line printer 


LT 


580-20 line printer 


CR 


405 card reader 


KB 


Remote terminal keyboard 


CP 


415 card punch 


DS 


Console display 


GC 


252-2 graphics console 


HC 


253-2 hardcopy recorder 


FM 


254-2 microfilm recorder 


PL 


Plotter 



Status Bits 23-21 Sequential file position: 

23 End-of-information 

22 End-of-file 

21 Beginning-of-information 

Bits 20-18 Magnetic tape characteristics: 

20 Labeled tape 
19 9*track tape 
18 7-track tape 

Bit 17 File is open. 

Bit 16 File is connected to terminal. 

Bit 15 File is on mass storage. 

Bit 14-10 Reserved (0). 
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Ft 



Eq 
NPRU 



Bits 9-6 Permissions:! 

9 Modify 

8 Extend 

7 Write 

6 Read 

File type (6-bit binary field): 

00 Local scratch 

01 Input (file name is INPUT) 

02 Output (print disposition) 

03 Punch (punch disposition) 

04 Permanent file 
77B Other disposition 

Equipment number, the EST ordinal of the device (12-bit binary number). 

File size in PRUs (if RMS file): 



Bits 59-36 
Bits 35-30 



PRU count 




CPRU 



Current file position (if RMS file) given as the number of PRUs from beginning- 
of-information (beginning-of-information is indicated by PRU count=l): 



Bits 29-6 
Bits 5-0 



PRU count 




GETJCI MACRO 

The GETJCI macro allows a user program to transfer the job control information used by the CCL to a 
specified location in the job's central memory field length. Job control information fields can be changed by 
executing the GETJCI macro to obtain the current fields, modifying the appropriate fields, and then executing 
the SETJCI macro to save the new fields in the system area. 

The call to this macro is: 

GETJCI addr 

addr Address of a 2-word table. 



'Read, extend, and modify reflect permanent file permissions for mass storage files. Write permission is set 
if either modify or extend permission is set. Modify, extend, and write permissions are set for magnetic tape 
files if the write-enable ring is present and cleared if the ring is absent. Read permission is set unless the file 
is a multi-file tape. 
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Format of this header word must be : 





59 


53 


35 


23 


17 




11 


5 





addr 


EFG 


RIG 


CCLDATA 


EM 


ssw 


a 


addr+1 


EF 


R3 


R2 


R1 



EFG 
RIG 

CCLDATA 
EM 

ssw 



EF 

R3-R1 
SETJCI MACRO 



Contents of global error register.' 

Contents of global register.t 

Contents of CCL register, for CCL use only (read by GETJCI) . 

Value of error mode, set only by mode statement (read by GETJCDJ 

Value of sense switches, set by SWITCH statement or by by SETJCI macro: 

Bit 6 Switch 1 
Bit 11 Switch 6 

Completion flag; must be set to before execution. Set to 1 when function is 
complete. 

Value of error flag. (If not set by the user, the system sets EF when the job aborts. 
If set to a non-zero number by the user, EF is saved by the system but does not 
cause job abort.) 

Contents of local registers.t 



The SETJCI macro allows a user program to transfer the job control information used by CCL from a speci- 
fied location in the job's central memory field length. Job control information fields can be changed by 
executing the GETJCI macro to obtain the current fields, then modifying the appropriate fields, and executing 
the SETJCI macro to save the new fields in the system area. 

The call to this macro is: 

SETJCI addr 

addr Address of a 2-word table. 



t These registers are CCL symbol names. 



60493800 E 



7-27 



Format of this header word must be: 





59 


53 


35 


23 


17 


11 


5 





addr 


EFG 


RIG 


CCLDATA 


EM 


ssw 


a 


addr + 1 


EF 


R3 


R2 


R1 



EFG 
RIG 
CCLDATA 

EM 
ssw 



ef 



R3-R1 



Contents of global error register* 

Contents of global register.* 

Contents of CCL register, for CCL use only (ignored by SETJCI). 

Value of error mode, set only by MODE statement (ignored by SETJCI).t 

Value of sense switches, set by SWITCH statement or by SETJCI: 



Bit 6 
Bit 11 



Switch 1 
Switch 6 



Completion flag; must be set to before execution. Set to 1 when function is 
complete. 

Value of error flag. (If not set by the user, the system sets EF when the job aborts. 
If set to a non-zero value by the user, EF is saved by the system but does not cause 
job abort.) 

Contents of local registers.* 



t These registers are CCL symbol names. 
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DEPENDENT JOB COUNT 

The dependency count of a job within a dependent string can be decremented from within a user program. 
This count also can be decremented by a control statement. Dependent jobs are explained in section 4 with 
the TRANSF description. Jobs in a dependent string do not execute until their dependency count is zero. 

The TRANSF macro is used to decrement the count of a job dependent on the currently executing job. 

TRANSF list 

list Beginning address of a list naming the jobs for which the dependency count is to be 

reduced. 

Names in the list should be left-justified with zero fill; the last word must be all zeros. 

READING CONTROL STATEMENTS 

With the CONTRLC function a central processor program can read or backspace within the control statements 
for the job. When the function is executed, the pointer to the next control statement is moved. The user is 
responsible for the resulting position of the control pointer. 

CONTRLC status,function,dfile,crack 

status Address of a reply word. 

function Control statement pointer repositioning: 

READ Move the statement image to RA+70 (octal) through RA+77 (octal) and 

change the pointer to point at the start of the succeeding control statement. 
The optional actions, described later, are done on the statement image in 
RA+70. 

BKSP Change the pointer to point at the start of the control statement preceding 
the current statement. 

dfile Optional dayiUe indicator. If non-blank the statement image is to be sent to the dayfile 

when the function is READ. 

crack Optional parameter; any non-blank character. When the function is READ, non-blank 

parameters from the statement are to be placed in locations RA+2 through RA+53, aligned 
as shown below. 

The reply word also is used to pass the function code in bits 0-17. If the function type is specified as above 
in the macro call, the macro puts the code into the word. If the function field is blank, the user must put 
the proper value into the word. The following codes are used 



000010 (octal) READ 



000040 (octal) BKSP 



Bit of the reply word is set to 1 when the function is complete. Bit 4 of the reply word is set to 1 if READ 
attempts to go past the last statement in the control statement record or in a CCL procedure. Bit 4 is also set 
to 1 if BKSP attempts to backspace past the job statement in the control statement record or past the procedure 
header statement in a CCL procedure. 
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If parameter cracking is requested, the parameters are stored left-justified with zero fill in bits 18-59, and a code 
indicating how the parameter ended is stored in bits 0-3. If the parameter is longer than seven characters, the 
first seven characters are stored with the 00 code and the parameter is continued in the next word. The word 
count is stored in bits 0-17 of RA+64 (octal). 

Processing stops when a terminator is found. The parameter ending codes are as follows: 

00 Continuation 05 Plus 

01 Comma 06 Minus 

02 Equals 10 Semicolon 

03 Slash 16 Other 

04 Left parentheses 17 Terminator 

In the cracking process, a statement is always considered to be a continuation statement. Blanks are always 
squeezed out and cannot be used to delimit the first parameter (keyword). Also the first parameter is always 
put in RA+2, the second in RA+3 (assuming the first parameter is less than eight characters), and so on. 

PROGRAM RECOVERY 

Two means are available to recover the results of a program that aborts during execution: 

The RECOVR macro can establish conditions under which control returns to the program after an error 
so that outstanding results can be saved or diagnostic information produced. The same results can be 
achieved by a direct RA+1 call to RPV. 

The CHECKPT macro can call for a. checkpoint during execution, such that the program can be restarted 
from the last checkpoint in the event of a subsequent abort. 



RECOVR MACRO 

With the RECOVR macro, a user program can gain control at the time when normal or abnormal job termination 
procedures would otherwise occur. Initialization of RECOVR at the beginning of a program establishes the con- 
ditions under which control is to be regained and specifies the address of user recovery code. If the stated con- 
dition occurs during program execution, control returns to the user code. 

RECOVR macro expansion calls the SETUP, subroutine. If necessary, the system increases the CP time limit, 
IO time limit, or mass storage limit to provide an installation defined minimum of time and mass storage for 
RECOVR processing. No limit is increased more than once in a job. A job can be recovered from only one 
operator KILL. 

RECOVR is concerned with conditions that affect job execution. The conditions under which control returns 
to the user, and the octal values that select them in the call to RECOVR, are: 

Arithmetic mode error 001 

PP call or auto-recall error 002 

Time or storage limit exceeded 004 

Operator drop, kill, or rerun 010 



System abort 


020 


CP abort 


040 


Normal termination 


100 
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Conditions can be combined as desired, with octal values up to 177 allowed in the flag field of the call to 
RECOVR. 



At least 5 seconds of central processor time always are available for user code execution. RECOVR makes the 
cxciiange jump pacKage anu rmTi contents avanauie to tue program ii use 
the user the option of having normal or abnormal job termination output. 



excjiaiige jump pa&cage anu RrtTi contents avanauie to tue progiam n user recoveiy cuue is executed aim gives 
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for PP program RPV. Although RPV can be called directly by a Monitor request in RA+1, use of the 
RECOVR utility is preferable for all except stand alone system utilities because operating system routines 
themselves use this capability. Only one set of recovery conditions can exist within RPV, but RECOVR 
allows up to five user and system set of flags and code for each program. The last RECOVR initialization 
will receive control first. 

The second specification of a subroutine overrides its previous parameters. This override can be used to 
remove a subroutine from the RECOVR list by passing a mask of zero. 

A checksum of the user recovery code can be requested during initialization. If flagged conditions subsequently 
occur, RECOVR again checksums the code before returning control to it. This gives some assurance of user 
code integrity before it is executed. 

RECOVR is initialized from a COMPASS program with: 

RECOVR name,flags,checksum 

name Address of code to be executed if flagged conditions occur; a return jump is made to 

this location. 

flags Octal value for conditions under which recovery code is to be executed, as outlined 

above; default is 77. 

checksum Last word address of recovery code to be checksummed; if no checksum. 

If one of the flagged conditions occurs, three arguments are passed to the reprieve-time subroutine. Al contains 
the address of the argument list; XI contains the address of the first argument. 

A 17-word (decimal) array showing the program situation when RPV was called. The first 16 words are 
an image of the exchange package with the error condition in the BO field. The seventeenth word is the | 
contents of RA+1. 

A flag that determines the type of program termination. If the user sets the flag non-zero, ENDRUN 
termination occurs upon completion of the last post-processing subroutine. If the flag remains zero, the 
original error code and the exchange package are restored and the job continues as if RECOVR had not 
been called. Altering the exchange package passed as argument 1 prevents the correct completion of the 
restore, but does not impair system operation. 

An array, starting at RA+1, that allows a FORTRAN Extended subroutine to access all of the user's 
field length. 

The subroutines called by RECOVR should return; if they do not, additional subroutine calls, if any, and the 
register/error flag restore is not performed. 
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If a program calling RECOVR contains overlays, both the call to RECOVR and the user recovery code should 
be a part of the level 0,0 code. 

Ihe error conditions and associated error codes and masks are: 

Error Code RECOVR Mask 

Condition (octal) (octal) 

Normal termination 100 

CP time limit 1 004 

Mode error 2 001 

PP program requested abort 3 020 

CP program requested abort 4 040 

PP call error 5 002 

Operator DROP 6 010 

Operator KILL 7 010 

Operator RERUN 10 010 

Control statement error 11 040 

ECS parity error 12 020 

Auto-recall error 15 002 

Hung in auto-recall 16 002 

Mass storage limit 17 004 

PP program not in library 20 002 

I/O time limit 21 004 

Ihe FORTRAN Extended language contains RECOVR subroutines as detailed in that reference manual. 



CALLING RPV DIRECTLY 

RPV should be called directly only by programs with complete control over all RPV requests that the routine 
issues. The RECOVR utility should be used in all other situations, because system-supplied routines such as 
a CDC CYBER Record Manager routine define (through RECOVR) their own reprieve routines. 

Two modes of reprieve processing are available with RPV, normal and extended. Normal mode provides the 
reprieve processing capabilities as described for the RECOVR macro. Extended mode provides all the 
capabilities of normal mode and the means of disabling external interrupts while the reprieve routine is active 
and resuming the interrupted program after the error has been processed. 



NORMAL RPV 

SETUP and RESET calls can be made with normal mode reprieve processing. Before an error is encountered, 
a SETUP call establishes the address of the reprieve routine and the classes of errors which cause control to 
be transferred to the reprieve routine. Following the processing of an error, a RESET call issued by the 
reprieve routine reinstates the error condition and allows system processing of the error as if the job had not 
been reprieved. 
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SETUP Call 

The RA+1 RPV SETUP call has the following form. 



59 






39 


35 


23 


17 


RPV 





* 
1 


n 
U 


iviasK 


U 


iv¥a 



Mask 

fwa 
59 



/ 



Iwa 

C 

Checksum 



Mask specifying the classes of errors for which the system initiates reprieve 
processing. 

First word address of a parameter list formatted as follows: 

29 




Checksum 



Remainder of Area to Receive Exchange Package 



First Word of Reprieve Routine Code 



Last word address of area to checksum (0 if no checksum). 
Completion bit; before the call; 1 upon completion. 
Set by RPV. Checksum of words fwa+21B through lwa. 



fwa 



fwa +1 



/ : 



fwa +21 B 
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Upon detection of an error condition, the system initiates RPV to reprieve the job. If the error condition is 
in one of the error classes specified by the mask, RPV transfers control to fwa+21B. RPV provides infor- 
mation about the error and the state of the interrupted program as follows: 



/ 



59 


53 




35 




17 










P 


AO 


Error Code 



















Remainder of Exchange Package 



RA+1 Contents at Time of Error 



First Word of Reprieve Routine Code 



fwa 



/: 



fwa +20B 



fwa +21B 



P Contents of the program register. 

AO Contents of the AO register. 

Error Code Code identifying the error condition which initiated reprieve processing. 



RESET Call 

The RA+1 RPV RESET call has the following form. 
59 41 35 




RPV resets the error and exchange package from the fields, starting at fwa specified in the SETUP call. 

EXTENDED RPV 

SETUP, RESET, and RESUME calls can be made with extended mode reprieve processing. The SETUP and 
RESET calls perform functions similar to the SETUP and RESET calls for normal mode RPV. The 
RESUME call restores the exchange package and causes execution of the program to resume at the point at 
which the error was detected. 
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The RA+1 RPV call has the following form. 
59 39 



fwa 



17 



RPV 





1 


1 
1 


fwa 



First word address of a parameter list formatted as follows: 



59 



/ 



35 29 23 17 



11 9 



iwa for Checksum 



Length 



Function 



Transfer Address 



Checksum 



New Mask 



Error Class 



Error Code 



Pending Interrupts 



Pending RA+1 Request 



Interrputed Terminal Input Request 



Reserved for CDC 



Error Flag 



Reserved for Installations 



fwa +0 

fwa +1 

fwa +2 

fwa +3 

fwa +4 

fwa +5 

fwa +6 

fwa +7 

fwa +10B 
fwa +11B 



Exchange Package 



/ 



fwa +30B 
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Length 
Function 



Length of parameter block. Set by user. 

Function code. Set by user. One of the following. 



SETUP call 
RESUME call 
RESET call 



lwa for 
Checksum 

Transfer Address 

Checksum 

New Mask 

Error Class 

Error Code 

Pending 
Interrupts 

Pending RA+1 
Request 

Interrupted 
Terminal Input 
Request 

Error Flag 
Exchange Package 



Completion bit. Cleared by user; set to 1 by RPV upon completion of function. 
Last word address of area to checksum (0 if no checksum). Set by user. 

Address to which control is transferred when an interruption occurs. Set by user. 
Checksum from transfer address through lwa of area to checksum. Set by RPV. 
Mask specifying the error class for which reprieve is desired. Set by user. 
Mask bit which specified the class of the reprieved error. Set by RPV. 
Code of reprieved error. Set by RPV. 

Bit i set indicates system error flag i is pending. Set by RPV. 
RA+1 contents at the time of interruption. Set by RPV. 



Reconstructed CIO RA+1 request for terminal input with auto-recall (0 if no 
interrupted terminal input). Set by RPV. 



Value of the system error flag at the time of interrupt. Set by RPV. 
Copy of the exchange package at the time of interrupt. Set by RPV. 
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Tne error conditions and associated error codes and masks are as follows: 

Error Code Mask 

Condition (octal) (octal) 

Normal termination 0100 

CP time limit 1 0004 

Mode error 2 0001 

PP program requested abort 3 0020 

CP program requested abort 4 0040 

PP call error 5 0002 

Operator DROP 6 0010 

Operator KILL 7 0010 

Operator RERUN 10 0010 

Control statement error 11 0040 

ECS parity error 12 0020 

Auto-recall error 15 0002 

Hung in auto-recall 16 0002 

Mass storage limit 17 0004 

PP program not in library 20 0002 

I/O time limit 21 0004 

Terminal interrupt 40 0200 

In a SETUP call, the user sets the new mask, the transfer address, and the lwa for checksum, and the user 
clears the pending interrupts, pending RA+1 request, and the interrupted terminal input request. If a 
SETUP call has the pending interruptions, pending RA+1 request, or interrupted terminal input request set, 
these fields are processed in the same way that a RESUME call processes them (see the description of 
RESUME). 

upuii UClCtuuu Ui an t>nvi, wiv aj i 

of the error classes specified by the mask, three possibilities exist. 

If the reprieve routine is not active, the job is reprieved. RPV sets the fields in the parameter block 
that describe the error and the state of the interrupted program and transfers control to the transfer 
address. 

If the reprieve routine is active and did not generate the error (error codes 1, 6, 7, 10, 12, 17, 21, or 
40), the job is reprieved. RPV marks the error in the pending interrupts word, and the reprieve routine 
continues. 

If the reprieve routine is active and did generate the error, the job is not reprieved. 

If the error condition is not in one of the classes specified by the mask, the job is not reprieved. Also, 
the second occurrence of KILL, CP time limit, mass storage limit, or I/O time limit is not reprieved. 
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A RESUME call directs RPV to restore the P, A, B, and X registers of the exchange package, pending RA+1 
request, and interrupted terminal input request and to transfer control back to the point in the program 
where the error was detected. However, if the pending interrupts word is non-zero, the reprieve routine is 
reinitiated to process the highest priority of the pending interrupts. The priority ordering of the interrupts 
is as follows: 



VVI\ VXttlVUlVil 



7 (Highest) 


Operator KILL 


10 


Operator RERUN 


6 


Operator DROP 


12 


ECS parity error 


17 


Mass storage limit 


21 


I/O time limit 


1 


CP time limit 


11 


Control statement error 


20 


PP program not in library 


15 


Auto-recall error 


16 


Hung in auto-recall 


5 


PP call error 


3 


PP program requested abort 


4 


CP program requested abort 


2 


Mode error 





Normal termination 


40 (Lowest) 


Terminal interrupt 



When RESUME is used following the processing of an error, the error condition should be corrected. For 
example, after a reprieve for a CP abort, the pending RA+1 request should be cleared before RESUME is 
called so that the RA+1 ABT request is not reissued. 

Caution is advised when using the RESUME- call or depending on the disabling of interrupts. An interrupt 
can often cause premature termination of activities related to the execution of the CP program. 

Therefore, if a program requires a RESUME call after interruption and disabling of interrupts, it must avoid 
using any of the following. 

Magnetic tapes 

Device set operations (PP programs: ADS, DUM, MNT, and DSM) 

Permanent file operations (ALTER, ATTACH, CATALOG, EXTEND, PURGE, and RENAME macros) 

Explicit file requests (REQUEST macro, and REQ PP program) 

DIS PP program 

Checkpoint/restart 

Job dependency processing (TRANSPF macro, and JDP PP program) 

Multi-mainframe file functions on files not yet transmitted 

Multiply-connected files 

PP programs: LBL, LDC, LDV, LDW, MDI, NSV, and XDQ 
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PP programs MNT and DSM can uc executeu implicitly as t«e rcsuit Oi otuer i/\j operations. Bsiore execution, 
the user should explicitly request possible mounts of all member devices used to avoid implicit mounts. After 
execution, the user may be required to explicitly request dismounts for dismounts that did not complete. 

Proper resumption of the program after an interruption and disabling of interrupts for activities related to the 
execution of the CP program are not guaranteed for an operator KILL. 

Normal mass storage operations always complete. The interrupted terminal input FET is left incomplete, and 
the FET address is available in the interrupted terminal input request word. 

Caution is advised when designing reprieve routines that issue RESUME calls to avoid alteration of the 
interrupted program, including the subroutine return address. 



REPRIEVE MACRO 

The REPRIEVE macro can call RPV directly. It issues an RA+1 request for extended reprieve processing. 
Programs that cannot call RPV directly should use the RECOVR macro. The request takes the following 
form. 

REPRIEVE addr,type,mask 

addr Address of the extended RPV parameter block. 

type Type of call (SETUP, RESET, or RESUME). 

mask Reprieve mask specifying the classes of errors for which the system initiates 

reprieve processing. 

T'U.h DTOD 1 ^^^ -wm^m innnrin +I-10 nnrntviAfar trnlnac i*-» + rt +li a f>r\Tme\r\f\n Alii rr fl£*1/4n If» i-Vte% nni-Omafni' 1-*1 ns\\r 'I'Ua 
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values in the other fields of the parameter block are the responsibility of the user. Use of the macro destroys 
the contents of registers Al, A6, XI, and X6. 
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CHECKPT MACRO 

A checkpoint of the program and files in use is obtained with the CHECKPT macro. The RESTART control 
statement is used to restart a job on the basis of information obtained from the checkpoint dump. See the 
CKP control statement for information about the checkpoint dump tape and other general information. 

An executing program would request checkpoint at various logical points, such as end-of-partition, x logical 
records processed, x seconds of elapsed time, etc. Checkpoint requests may be issued more than once. The 
request takes the following form: 

CHECKPT param,sp 



sp 



Mass storage files to be processed. 
All files 

Non-zero Certain standard files plus files in a parameter list. Assumed if sp is not given. 



param Address of a parameter list formatted as follows: 

59 48 



If 



cpn 




n 


0000 


Ifn1 


f1 




Ifn2 


f2 













addr+0 



addr+1 



addr+2 



Ifnn 



fn 



addr+n 



cpn 



lfn 



Contains the checkpoint number unconditionally returned by CHECKPT. A zero value 
indicates no checkpoint was taken. 

Defines number of ifn entries in following list, to a maximum of 42 (decimal). 

Name of user mass storage files to be processed; left-justified display code. 
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Octal number indicating specific manner in which Ifn is to be processed. 

Mass storage file is copied from beginning-of-information to its position at check- 
point time, and only that portion is available at restart. The file is positioned at 

1 Mass storage file is copied from its position at checkpoint time to end-of- 



;.^m.ntinti artA rtnli/ that nnrtir)« i« nvnilartln nt restart. The file IS DOSltioned 

at the former point. 

2 Mass storage file is copied from beginning-of-information to end-of-information; 
the entire file is available at restart time. The file is positioned at the point at 
which the checkpoint was taken. 

3 The last operation on the file determines how the mass storage file is copied. 

When the manner of copying a mass storage file is to be determined from the last operation on the 
file, checkpoint derives f values from the last code status as follows: 

f = if code/status ends in 4, 5, 6, or 7 or if code/status ends in 0, 1 , 2, or 3 and end-of- 
information is set. 

f = 2 if code/status ends in 0, 1 , 2, or 3 and end-of-information bit is not set. 
The following standard files, if they exist, are always copied to the checkpoint dump tape. 



File 



Default Copy Type 



INPUT 

OUTPUT 

PUNCH 

PUNCHB 

LGO 

CDC CYBER Control Language Internal Files 



2 



3 

-j 

2 



The default copy type may be overriden by including the file name in the parameter list For any file to be 
copied which is in neither the standard file list nor the parameter list, the copy type is f-3. 

Generally, these values cause the entire mass storage file to be copied for: write operations, read operations 
resulting in end-of-information status, and rewind operations (excluding some OPEN functions). 

The checkpoint macro generates the following code in X6 followed by a return jump to SYS=. 



59 


39 


35 


23 


17 


CKP 1 


1 


sp 




param 
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FILE ACTION MACROS 

Each of the following functions addresses a file by its logical file name. A file environment table must exist 
for the file before its residence and use can be specified. The FET creating macros may be used, or the pro- 
grammer can construct his own FET conforming to the format expected by the system. 

When any file action request is issued, values are returned to the device type, disposition code, and FNT 
pointer fields in the FET. 

All these functions, with the exception of READIN and WRITOUT, expand to a sequence of code that 
includes a return jump to routine CPC. READIN and WRITOUT bypass CPC by calling the random indexed 
record processors directly. For the other functions, CPC will call the appropriate PP routines to carry out the 
function specified. 

Files manipulated by the following functions should not be manipulated by the functions described in the 
reference manual for the Record Manager within the same run. 

The macros which call CPC are contained in the CPCTEXT system text overlay. 

REQUEST MACRO 

File residence can be specified by a REQUEST control statement or macro, with the same results. 

File action requests must reference the logical file name (lfn) of the file. If the file is a member of a multi- 
file set, all functions must reference the lfn of the set member. No function except REQUEST may be issued 
using the set name. 

The REQUEST function informs the system of file characteristics. 

REQUEST addr 

addr is the first word of a variable length parameter list constructed by the user. The list must be at least 
two words long; maximum length required is that which supplies the parameters indicated by bits set in the 
flag field. 

The parameter list must have the form shown below. The parameter list used with the REQUEST macro 
I must be reinitialized after each call. Word 2 (addr+1), in particular, can be changed by the system during 
processing. 
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59 



47 35 



Logical File Name 



23 17 



Flags 



11 



(Status Return) 



Flags 



Volume Serial Number 



Device Type; 
Allocation 



(CDC reserved) 



Device Set Name 



ECS Buffer 
PorK I Size 



Magnetic Tape File Header Label Information 



Magnetic Tape File Header Label Information 



addr+O 



addr+1 



addr+2 



addr+3 



addr+4 



addr+n | 



Logical File Name Logical file name, left-justified, zero-filled. 

Status Return Initially, user should set to zero. The system returns the codes given below. 

C Completion bit; set to 1 upon completion of REQUEST function. 



Flag Fields 

Device Type and 
Allocation 

Volume Serial 
Number 



Each bit is a flag for a particular condition listed below. 

Bits 6-1 1 are the octal device type code listed in the FET description of section 6; 
allocation styles of that device (except tape units) are installation defined. 

Volume serial number identifying a particular device of a device set or a magnetic 
tape for automatic assignment. (Binary zeros in this field indicate a scratch tape.) 
When given, the VSN must be right-justified with display code zero fill. 



Device Set Name 1.7 letters or digits of device set name left-justified, zero-filled, with the first char- 
acter alphabetic. Bit 17 of word 2 (addr+1) must be set if this parameter is given. 



ECS Buffer 
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If the file is to be buffered through ECS, bit 33 of word 2 (addr+1) must be set. 
The size of the buffer must be in bits 0-11, with bits 12-17 showing a display code 
P if the size is in pages, or a K if the size is in thousands of words. The ECS 
parameter can also be used on a CDC CYBER 170 Model 176 to request a specific 
number of LCM buffers for buffering data to the 819 disk. A request for an 819 
device without the ECS parameter results in the default number of LCM buffers. 
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Tape Label Fields Label information for normal or extended label processing, formatted as shown below. 
Normal label processing is assumed unless bit 49 of word 2 (addr+1) is set. If 
either bit 48 or bit 49 is set and no VSN is specified, depending on the selection 
of installation options for automatic tape assigning capabilities, the magnetic tape 
identified by the file label name is used for automatic assignment. Edition number, 
creation date, and volume number need not be specified; if they are specified, they 
must match the fields as read from the label of the candidate tape. The file label 
name or the VSN must be n resent to allow automatic assi CTt iment. 

The flags are individual bits that should be set to 1 to indicate the following conditions; otherwise the bits 
should be 0. 



Meaning 

Inhibit hardware GE write error correction. 

1 = Assign file to queue device. Implies RMS device and causes automatic 
assignment. Not allowed for private device set. 

Write enable ring prohibited in tape. 

Write enable ring required in tape. 

7-track or 9-track tape can be assigned. 

Assign any RMS device. 

Parameter list words 5-9 have extended label processing format. 

Parameter list words 5-9 have operating system label format. 

ECS buffering with parameters set in word 4 (addr+3). (Private device set files 
cannot be ECS buffered.) 

| 32 OV Overflow allowed to different device if that specified in word 2 (addr+1) is not 

available; if EP bit is set, a device capacity exceeded status is returned if no 
mass storage is available; permanent files overflow only to another permanent 
file device. OV implies RMS and forces automatic assignment. 

31 PF File must reside on a permanent file device. PF implies RMS and causes auto- 

matic assignment. 

9-track tape conversion to ASCII codes. 

9-track tape conversion to EBCDIC codes. 

Device to be assigned by system rather than operator (OV, PF, A*, *Q causes 
bit 28 to be set). 
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Bit 


REQUEST 

Control Statement 

Equivalent 


1 


57 


IEC 




55 


*Q 


1 

i 


53 


NORING 




52 


RING 




51 


MN 




50 


A* 




49 


none 




48 


none 


1 


33 


EC 



30 


US 


29 


EB 


28 


♦prefix to device 




type 



Bit 

27 



25 



20 



REQUEST 
Control Statement 
Equivalent 

none 



Meaning 

Format of operator flashing message; if set, contents of RA+70 through RA+77 
are displayed: if 0. REQ constructs the message from the REQUEST parameter 
list. 



When this bit is set, the flashing B display message is not put in either job or system dayfile. Also, since 
the request parameters are extracted from the parameter list, the operator may see a flashing message 
which bears no relationship to the actual request; and as a result, may assign an incorrect device. 



26 2 prefix to device 



VSN 



24 


E 


23 


NS 


22 


NR 


21 


Z 



none 



19 





18 


MF 


17 


SN 


16 





15 


absence of 




explicit density 


14 


SV 


13 


IU 


12 


CK 



Two magnetic tapes requested. (For two tape assignments, bit 28 and bit 25 
are cleared.) 

Word 3 contains a volume serial number for a magnetic tape or device set 
member. Bit 25 is cleared if bit 26 is set. 

Magnetic tape is labeled currently. 

Non-standard labels on tape are considered data, not labels, by operating system. 
Not supported on SI tapes. 

Normal system tape read parity error processing is to be inhibited. 

Magnetic tape has Z format label of SCOPE 3.3, with character 12 of VOL1 
label establishing data density. 

Special return of error code to user; do not issue dayfile message or consult 
operator. 

Reserved. 

Request is for a multi-file set. 

Set name for a device set. 

Reserved. 

Magnetic tape is to be written at system default density. 

Output tape to be saved. 
Inhibit physical unload of tape. 
Checkpoint tape request. 



Format of the tape label fields depends on whether normal label processing is requested. The label fields 
must be in display code format, with acceptable values for each field, as detailed in section 3. 
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Label information for normal processing: 
59 47 



29 



23 



17 



11 



File Label Name 


File Label Name 


Position Number 


Edition 
Number 


Retention Cycle 


Creation Date (yyddd) 


Multi-File Set Name 


Volume Number 



Label information for extended label processing: 
59 53 41 35 



29 



17 



11 



HDR1 


Fiie Label Name 


File Label Name 


a 


Multi-File Set Name 


Volume Number 


b 


Position Number 


Generation Number 


c 


c 


Creation Date ( yyddd) 







a File label name continued. 
b Volume number continued, 
c Edition number. 

Once the REQUEST function is completed, bit zero of the first word (addr+0) of the parameter list is set to 
1. In addition, bits 9-13 of word 1 (addr+0) may show one of the octal codes below. If so, the REQUEST 
function has been ignored and control returned to the program. 

22 Recall bit was not set in call to PP routine REQ. 
24 File name table is full 

26 Device of the requested device type is unavailable. 

30 File is already assigned to a device; the device type code is returned to the device type field 
of the parameter list. 



7-46 



60493800 E 



Two dayfile messages result from a successful REQUEST function. The first, directed only to the operator, 
contains parameters corresponding to those used in the internal parameter list. After assignment, a second 
message is written to the job and system dayfiles reflecting the assignment. For example, if a REQUEST 
function is made with dt set to zero, the operator display shows no device type. If the operator assigns a 
7-track tape, however, the mnemonic MT appears in the job dayfile message. 

Conflicts between dt requested and dt assigned by the operator must be resolved by the operator using the 
n.YES or n.NO command. 



OPEN AND CLOSE FUNCTIONS 
Two functions are available for opening files: 

OPEN is applicable to all files. 

POSMF is applicable only to labeled multi-file tapes. 
Files can be closed with the following functions: 

CLOSE is applicable to all files. 

CLOSER is applicable to sequential files on tape or on a device set; it gives the user control over end- 
of-volume processing. 

OPEN MACRO 

An OPEN function is a file initialization and status checking operation. The user must issue an OPEN if: 

Random files are to be processed by the user or system. 

User label processing is to follow. 

Sequential files are to be rewound without a REWIND function being issued. 

Otherwise, OPEN is not necessary. If an OPEN function is to be issued, it should be the first function issued 
on a given file; otherwise the effect of the OPEN function is undefined. 

OPEN lfn,x,recall 
The x parameter may be any of the 10 values: 

absent NR 

READ READNR 

REEL REELNR 

ALTER ALTERNR 

WRITE WRITENR 



I 



60493800 E 7-47 



The WRITE or WRITENR values of x may be used to ensure that the file circular buffer is emptied if the 
job terminates abnormally before buffer contents have been transferred to an output device. The first data 
function following these OPEN functions must not then be a read or a forward motion function. 

If the value of x is READ, REEL, ALTER, WRITE, or absent, sequential files are rewound. Any other value 
of x does not reposition the file. 

When an OPEN is issued, the following events occur. 

For sequential files, file position is changed to beginning-of-information unless a no rewind is specified 
by using an x parameter ending in NR. The r bit in the FET is set to zero. 

For labeled magnetic tape files, processing depends on the presence or absence of the XL bit in the FET. 
If the XL bit is set, all labels are written from or delivered to the file label buffer. If the XL bit is off 
and labels are being written, the HDR1 label is formatted from data in the FET label fields. If labels 
are being read (XL off), the HDR1 label is returned to the FET label fields. 

For random files, if the r bit is set, any existing index is read into the index buffer. If the index 
record is shorter than the buffer, unused buffer space is set to zeros. If the r bit is not set, an existing 
index is not read. 

For all files, the physical record unit and record block sizes are returned to FET fields. 

The macro OPEN generates the following code. 

59 47 41 39 29 17 



SA1 


Ifn 


RJ 


CPC 


000004 





r 





z 



The z field depends on x. 



160 if x is absent 
140 if x is READ 
340 if x is REEL 
1 44 if x is WRITE 



or ALTER 



120ifxisNR orALTERNR 
lOOifxisREADNR 
300ifxisREELNR 
104 ifx is WRITENR 



There is no difference in the action taken by the system for codes 160, 140 and 340 or for codes 120, 100 
and 300. 

POSMF MACRO 

The POSMF function positions standard labeled multi-file sets. The multi-file set to be positioned is specified 
by the multi-file name in the label field? of the FET or, if the XI bit is on, in the HDR1 label field in the 
extended label buffer. The named multi-file set is positioned to a particular file and an OPEN with rewind 
function is performed. If a position number is specified in the label field or label buffer, that number specifies 
the file to be opened. 
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POSMF mfn,recall 
mfn FET name of multi-file set. 



i^uii-uicuiA. voiuc 11 iui auiu icvau, uuiciwue, viaiuv. 



The position number is specified in either word 11 (lfn+12) of the FET or the extended label buffer, depend- 

uig vii uiv iaubi piuwvaoiug i.u uv ywiviiuvu. aa uwiuai uiuvi ^ivvvi»mg ao i,w v^^ui. una va ; ui w uiu a j. 

(lfn+1 2) of the multi-file name FET may contain the position number (position numbers begin with 1 for 
the first file). For extended label processing to occur, the XL bit must be set (bit 41 at mfn+1). The 
position number is expected to be in the ANSI standard position field of a record formatted as an HDR1 
label within the label buffer. A fatal error exists if HDR1 is not found within the label buffer. 

If the position number is 0, the set is positioned at the beginning of the next file. OPEN procedures for an 
existing file follow. If the position number is 999 in the FET or 9999 in the label buffer, the set is positioned 
after the last member file and OPEN procedures instituted for a new file. 

End-of-set status (21 in bits 9-13 of mfn) is returned to the FET for the multi-file set if the explicit or 
implied position number is greater than the last member of the set. The position field in the FET will be 
one greater than that of the last member file. 



The POSMF macro generates the following code. 
59 47 41 39 



29 



17 



SA1 


Ifn 


RJ 


CPC 


000003 





r 





000110 



CLOSE MACRO 

A CLOSE function is a file terminating operation. The user must issue a CLOSE if: 

Random files have been created or modified and a valid index is to be saved. 

End-of-job procedures listed below are to be initiated for a file before the actual end-of-job. 
Otherwise, a CLOSE is not necessary. 

CLOSE lfn,x,recall 

The x parameter may be: 

absent 
NR 

UNLOAD 
RETURN 
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If the value of x is absent, UNLOAD, or RETURN, the file is rewound. NR specifies that the file is not to 
be rewound. Both of these positionings are possible only with sequential files; positioning is not defined on 
files for which an index is written. 

When a CLOSE is issued, the following events occur. 

For sequential files, position will be changed according to the rewind associated with the x parameter. 

For labeled magnetic tape files, action depends on the x parameter. If no rewind is specified and the 
file is positioned after a newly written record, a file mark and an EOP trailer label is written, then the 
file will be positioned immediately before the file mark. If the file is to be rewound and it is 
positioned after a newly written record, an EOP trailer label is written before the rewind is initiated. 

For unlabeled S and L tape files, four tape marks are written instead of an EOP trailer label. Otherwise, 
processing is the same as for labeled tape files. 

For random files, the index is written as the last system-logical-record if the FET r bit is set, an index 
buffer is specified, and file contents have been altered since the last OPEN function was issued. 

The user must empty the file circular buffer when files are being written; CLOSE does not empty the buffer. 

When CLOSE/RETURN or CLOSE/UNLOAD is issued, end-of-job processing procedures occur for the named 
file. 

Permanent files are detached from the job. 

For magnetic tape files, a CLOSE/RETURN decreases the number of tape units required by the job as 
indicated with the MT or NT parameter on the job statements. A CLOSE/UNLOAD does not decrease 
this value. A CLOSE/UNLOAD or CLOSE/RETURN function issued on a member of a multi-file set 
acts as a CLOSE/REWIND on that member. 



The CLOSE macro generates the following code. 
59 47 41 39 



29 



17 



SA1 


Ifn 


RJ 


CPC 


000007 





r 





z 



The z field depends on x. 

150 if x is absent 
130ifxisNR 
170 ifx is UNLOAD 
1 74 if x is RETURN 
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CLOSER MACRO 

Processing of both magnetic tape and device set tiles continues across voiume or device boundaries when data 
is skipped in a forward direction, read, or written. With the UP bit of the FET the user can request notifica- 
tion when a boundary is about to be crossed; anu voturnes or uevices can i»e processeu in otner uuan ascending 
order. 

iHC t^IAJOIlIS. xU-iliJ-liUli i±IIUIU2» il ucticc iji LiiCi ^vjiiliui yvci L/iWd^aamg ai uiu'ui'tuiuiuv ui viiu'ui'uvuw. 

CLOSER lfn,x,recall 

The x parameter may be: 

absent Rewind 

NR No rewind 

UNLOAD Rewind and unload 

RETURN Rewind and unload; do not swap reels 

MAGNETIC TAPE PROCESSING 

For magnetic tapes, the system initiates volume swapping if the UP bit is when CLOSER is issued. The file 
is positioned on the next volume and file operations can continue normally. An OPEN function is not required 
for the second volume, but may be issued if the program is to receive the header label contents. 

A volume swap is performed by the following steps: 

1. If the tape is positioned after a newly written record, a volume trailer label is written. 

2. The tape is unloaded and the operator is notified that processing on that volume is completed. 

3. If two units were assigned to the file, unit numbers are interchanged so processing continues with- 
out changing tables referencing the unit. 

4. The volume number of a labeled file is incremented by one in the system label table and, if 
declared, in the user's FET label fields. 

5. The FET completion bit is set. End-of-volume status is not returned. 

If the UP bit is set to 1 when the CLOSER is issued for a tape file, the user may specify the next volume to 
be processed. The following occurs. 

1. If the tape is positioned after a newly written record, a volume trailer label is written. 

2. The tape is rewound or rewound/unloaded according to the CLOSER parameter. 

3. The operator is notified that processing on that volume is completed. 

4. If two units were assigned to the file, unit numbers are interchanged. 

5. The end-of-volume status and completion bits are set. 
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To establish the next volume to be processed, the user must enter the volume number in the FET label field 
in bits 0-24 in word 13 (lfn+14) before another function is issued to the file. A following OPEN function 
is not required unless the program uses the header label of the new volume. 

When CLOSER/RETURN is issued, normal end-of-volume processing is performed regardless of the UP bit. 
Instead of swapping to the next volume as in the CLOSER macro, the file is returned (disassociated from 
the job). 

End-of-volume processing for CLOSER/RETURN is performed by the following steps. 

1 . If the tape is positioned after a newly written record, a volume trailer label is written. 

2. The reel is unloaded according to the IU parameter on the REQUEST statement. 

3. The FET completion bit is set; end-of-volume status is not returned. 

4. The FNT entry is cleared and FET IN/OUT pointers are set to FIRST. 



ROTATING MASS STORAGE DEVICE PROCESSING 

For an RMS device, the operating system performs the following. 

1 . If the file is at EOI and the last RBT word pair is not an overflow word pair, an EOI status (bit 
9) is returned in the FET and FST; and an overflow word pair is added at the end of the RBT 
chain. 

2. If the file is at EOI and the last RBT word pair is an overflow word pair, an EOI status is 
returned in the FET and FST. 

3. If the file is not at EOI but positioned on an overflow word pair, the current position in the FST 
is updated and points to the RBT word pair following the overflow word pair. 

4. If the file is not at EOI and is not positioned on an overflow word pair, the system skips to the 
next overflow word pair or to EOI (whichever it finds first) and then takes action as described 
above. 

In all cases, the completion bit is set in the FET and FST and the end-of-device status (bit 10) is set in the 
FST. If the UP bit is set in the FET, then the end-of-device status is also returned in the CS field of the 
FET. 

Processing continues on the next device as soon as the user issues another input/output function for the file. 
The macro for CLOSER generates the following code. 

59 47 41 39 29 17 



SA1 



Ifn 



000007 



RJ 



CPC 
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The z field depends on x. 



350 if x is absent 

^^^ ^ v * c NP 2lthou a H result is the same as 350 

370 if x is UNLOAD 

374 if x is RETURN 



READ FUNCTIONS 

Six read functions are available for bringing information into central memory. The functions, and the main 
distinctions among them, are: 

READ Applicable to all mass storage and tape files. Reading stops when the end of a 

physical record or the end of a system-logical-record of level 0-1 6g is encountered. 

READNS Applicable to mass storage files only. Read does not necessarily stop at end-of-logical 
record. 

READSKP Similar to READ, but positions file to beginning of next logical record when the circular 
buffer is filled. 

RPHR Applicable to magnetic tapes in SI format only. Reads the next PRU delivering coded 

data in internal BCD codes (7-track).For 9-track SI tapes, the data is read in packed mode 
and delivered with no conversion. 



READN Applicable to magnetic tapes in S and L data format only. 

READIN Applicable to all mass storage and tape files. 
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dependent on the specific function and the size of the buffer. As information is read into the buffer, operat- 
ing system routines change the value of the IN pointer. This value, minus 1, is the address of the last word 
read. The user is responsible for using the IN pointer while removing information from the buffer, and for 
setting the OUT pointer to reflect the move, except when the READIN macro is called. READIN, like 
WRITOUT, relieves the user of responsibility for IN and OUT pointer manipulation. By means of a secondary 
buffer called a working storage area, READIN maintains circular buffer pointers. 

As processing progresses, status information is returned to the code and status field of the FET. If the user 
has the EP bit set, control returns to his program for OWNCODE routine execution when file action errors 
occur. Otherwise, the operator is notified and given the option to drop the job. 

The 18 bit code and status field will show the values listed below for the conditions that cause various read 
functions to terminate. Bits in the field have the purposes: 

Bits 14-17 System-logical-record level number 

Bits 9-13 File action error code 

Bit 4 End-of-logical-record indicator 

Bit 3 End-of-partition indicator if bit 4 is set 

Bit 1 Mode indicator: for coded, 1 for binary 

Bit Complete bit 

For binary files, the low order octal digit of the code and status is 3 instead of 1. 
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Condition Code/Status Setting for Coded Files 

End-of-information encountered 741031 

Zero-length PRU of level xx is read xx0021 

Level 17g system-logical-record or level 16g mass 

storage fue read with READNS 740031 

Next PRU will not fit into circular buffer 000011 

Unrecoverable file action error code ee OeeOll 

File action error codes are listed in the error exit address field in the FET discussion of section 6. 

When a read for a file is issued without recall, the IN pointer is updated as each PRU of data is moved to 
the buffer, allowing the user to remove data as fast as it is placed in the buffer. When the request is issued 
with recall, the pointer is not changed until the request is complete. For magnetic tape, the code status 
(bits 11, 12) is set for each record before the IN pointer is moved. Tapes can be read dynamically as 
follows: 

EP must be on. 

Check to determine if IN has moved; if not, repeat check. 

When IN has moved, check CS field for errors. If none, process record. If errors occurred, wait for 
complete bit to set. 

For S and L format files, the UBC field is set as a record is read. 

All the following read functions, except READIN, expand to a two-word sequence of code which includes a 
return jump to routine CPC. The READIN function expands to call routine IO or IGRANDM, which calls 
CPC. 

Parameters appearing in the macros are: 

lfn Logical file name 

recall Optional recall parameter of any letter or digit 

READ MACRO 

The READ function is applicable to all types of files. READ causes information from the specified file to 
be placed in the circular buffer for the file in central memory. 

READ lfn,recall 
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Reading begins as long as the circular buffer has room for at least one physical record unit. It continues 
until: 

The next PRU will not fit into the circular buffer. 

End-of-logical-record or end-of-partition is encountered. 

End-of-information is encountered. 

File action error occurs. 

For S and L tapes, one physical record is read. 

If the end-of-logical-record bit [bit 4 of word 1 0fn+O) of the FET] is set when READ is called, CPC ignores 
the request. 

For S and L tapes, the unused bit count is returned to the UBC fieid in the FET word 7 (ifn+6) when the 
read is complete. 

The READ macro generates the following code: 
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READNS MACRO 

The READNS function is applicable only to mass storage files. A single READNS often results in more 
information being transferred to the circular buffer than a READ issued to the same file since reading does 
not necessarily stop at the end of a logical record. 

READNS lfn,recall 

Reading begins if the circular buffer has room for at least one physical record unit. Reading continues until: 

The next PRU will not fit into the circular buffer. 

Zero-length system-logical-record of any level is read. 

Level 16g or 17g system-logical-record is read. 

End-of-information is encountered. 

File action error occurs. 
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The READNS macro generates the following code. 
59 47 41 39 
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000002 





r 
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READSKP MACRO 

The READSKP function is applicable to all types of files. READSKP is used to identify and skip records. 
Reading continues until an end-of-logical-record is encountered, or the circular buffer is full. Gnce the buffer 
is full, the file is repositioned to the beginning of the next record. READSKP is halted by any conditions 
which halt a READ. 

READSKP lfnjev.recall 

Ifh Logical file name. 

lev Optional level number 0-178- Default value is 0. 

recall Optional recall indicator. 

If a level parameter lev is specified for SI tapes or mass storage files, information is skipped until the 
occurrence of an end-of-logical-record with a level number greater than or equal to the one specified. For S 
and L tapes, only a request with level 17g is recognized; any other level in the request is ignored. 

When the READSKP is executed, the end-of-logical-record bit [bit 4 in word 1 (lfn+0) of FET] is set, since 
an end-of-logical-record is encountered in the skip to the beginning of the next record. This bit must be 
cleared by the user program before a subsequent READ, but not a READNS, is issued. When EP=1, a READ 
error prevents the skip; and control returns to the user. 



For S and L tapes, the user should set the MLRS field before the READSKP is issued, 
the system sets it to 512 words for an S tape and to LIMIT-FIRST- 1 for an L tape. 



If this field has a 0, 



An end-of-volume condition on a magnetic tape file with the UP bit set terminates the skip of a READSKP 
even if the beginning of the next record has not been encountered. Otherwise, volume swapping takes place 
under system control. 



The READSKP macro generates the following code. 
59 47 41 39 



29 



17 13 



SA1 


Ifn 


RJ 


CPC 


000003 





r 





lev 


- 

00020 



7-56 



60493800 E 



RPHR MACRO 

The RPHR function is applicable only to magnetic tapes in SI format. RPHR causes all information existing 
in the circular buffer to be discarded and the next PRU to be read into the buffer. 

RPHR lfn,recall 

For coded 7-track files, data is converted from external to internal BCD only. Conversion to display code is 
not made. No conversion takes place for 9-track tapes; the data appears as written. SI tapes are always 
written to contain exact multiples of central memory words by filling the last word with zeros. 

The RPHR macro generates the following code. 
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READN MACRO 

The READN function is applicable only to magnetic tape in S or L format. READN allows maximum tape 
throughput; as long as the user provides space in the circular buffer for two records and their header words, 
tape reading continues without releasing and reloading the read routine between physical records. This 
gives maximum utilization of interrecord gap time. The minimum buffer size for reading an S or L tape should 
be two words more than the maximum logical record size (MLRS field of the FET). 

READN Ifn.recall 

Before this function is issued, the MLRS field of the FET [bits 0-17 of word 7 (lfn+6)] must be set to the 
largest physical record that will be encountered. File mode must also be set. 

Reading continues until: 

The next record will not fit into the circular buffer. 
End-of-file is encountered. 
End-of-information is encountered. 
File action error occurs. 

The header word that precedes each physical record in the circular buffer is generated by the system; it does 
not exist on the tape. The format of the header word is: 
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CM words Number of 60-bit words in the physical record 

UBC Number of bits in the last word that are not valid data 

After each complete physical record has been placed in the buffer, the system moves the IN pointer to 
reflect both the header and data. 
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i ne kealtn macro generates tne ionowing coae. 
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READIN MACRO 

The READIN function is applicable to all mass storage and tape files, READIN employs a user-provided 
working storage area as well as the file circular buffer. The user deals only with data in the working storage 
area; the system handles the circular buffer and the IN and OUT pointers of the FET. 

Format of the READIN macro depends on the structure of the file being accessed. The second parameter is 
required only if the file is a random indexed file with a name or number index. 

When READIN is executed, data from the circular buffer is placed in the working storage area. The amount 
of information transferred depends on file mode: 

For binary files, READIN fills the working storage area unless an end-of-logical-record or end-of- 
information is encountered before the area is full. 

For coded files, information is moved to the working storage area until a 12-bit zero byte in the low 
order bits of a word (end-of-line indicator) is encountered or the working storage area is full. When a 
zero byte is encountered, two blanks are substituted and the remainder of the area is filled with blanks. 
If a zero byte is not met before the working storage area is full, the remainder of the line is skipped. 
The next READIN request obtains the next line rather than the end of the first line. 

READIN issues calls to READ through CPC as needed. If the data in the buffer does not satisfy the 
READIN request, a READ with recall is issued. Therefore, the user does not gain control until his request 
is satisfied. 

If a working storage area is not specified, a READIN request has no effect, except as described below for 
indexed random files. 

READIN makes a check of the I/O progress immediately prior to returning to the user program. A READ 
without recall is issued if the circular buffer is not already busy and it is more than half empty, so that 
input/output is buffered with subsequent computing by the user program. 
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Sequential or random files are read with the following macro. 
READIN lfn 

When an end-of-logical-record or end-of-partition is encountered during a read of a sequential file, the user 
regains control immediately, with the XI register showing the state of the request. Filling of the working 
storage area ceases. The next READIN request begins with the next record. 

Status information in the XI register may be: 

Positive zero Requested number of words was read and the function completed normally. 

Positive non-zero The working storage area was not filled because the remainder of the logical 

record contained too few words when the READIN was issued. XI contains 
the address of the first unfilled word, or if no data was transferred, the first 
word address. For coded files, this is always the first word address. 

Negative non-zero No data was transferred to the working storage area because an end-of- 

partition or end-of-information was encountered. 

When an indexed random file has named or numbered records, READIN positions the file to the desired 
record. 

READIN lfn,/name/ 

READIN lfn,n 

/name/ Name of record 

n Number of record 

When a READIN is issued for such an indexed random file, the current contents of the circular buffer are 
destroyed when the IN and OUT pointers are set equal. Then, the mass storage address corresponding to the 
record number or name is copied from the index into FET word 7(lfn+6), and a READ request with recall is 
passed through CPC. On return from the READ, the procedures for a READIN without a name or number 
parameter are followed. If a working storage area is specified in the FET, the beginning of the record is 
copied into it and the FET pointers are adjusted. If no working storage area is specified, no further action 
occurs; however, the file has been positioned and reading of the desired record has been initiated by READIN. 

Any remainder of the record can be read by subsequent READIN requests that do not identify the record by 
name or number. After an end-of-logical-record is encountered on a random file, further READIN requests 
specifying only a file name will not initiate reading of the next record, as they would on a non-random file. 
To start reading the next record, or some other record on a random file, a READIN with a record name or 
number must be issued. 

When a record is located by a READIN request containing its name or number, the number of the record is 
stored in word 8 (lfn+7) of the FET, making it possible to read the next record with: 

READIN lfn,0 
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The system interprets this statement as record n+1. Consequently, by starting a new record with a request 
that identifies record number zero, the list of records as given in the index can be read. However, if the 
calling program did not stop before overshooting the end of the index, there would be an error return from 
READIN on the last+1 record. 

The code generated by the READIN macro depends on the second parameter. For no parameter, a name 
parameter, and a number parameter, respectively, the code is: 
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WRITE AND REWRITE FUNCTIONS 

Information is transferred from the file circular buffer to a storage device when one of the write functions is 
issued. These functions and the main distinctions among them are: 

WRITE Applicable to mass storage and tape files; writes at end-of-information. 

WRITER Applicable to mass storage and SI tapes; writes a short or zero-length PRU to indicate 

end-of-logical-record. 
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WRITEF Applicable to mass storage and magnetic tape files; writes an end-of-partition indicator. 

WPHR Applicable to magnetic tapes in SI format only; writes a single physical record; the 

only write function that expects coded data in internal BCD format. No conversion is 
performed for 9-track coded tapes. 

WRITEN Applicable to S and L data format tapes only. 

WRITOUT Applicable to mass storage and tape files; the only write function in which the system, 

rather than the user, manipulates the buffer pointers of the FET. 

REWRITE Applicable to mass storage only; rewrites record of same length. 

REWRITER Applicable to mass storage only; writes an end-of-logical-record indicator for a 
rewritten record. 

REWRITEF Applicable to mass storage only; writes an end-of-partition for a rewritten file. 

WRITIN Applicable to mass storage file to be rewritten only; analogous to WRITOUT using 

REWRITE rather than WRITE. 

The system sets the OUT pointer when data is removed from the buffer. The user must manipulate the IN 
pointer as he places information in the buffer, as explained under Circular Buffer Use in section 6, 

When S and L tapes are being written, the MLRS and UBC fields in the FET must be set by the user to 
indicate the size of the record before a write is issued. 

Status information and error codes are returned to the first word of the FET as the file is written. If the 
user has the EP bit set, control returns to his program for OWNCODE execution when file action errors 
occur. Otherwise, operator is notified and given the option to drop the job. 

Parameters that appear in the write macros are: 

lfn Logical file name 

recall Optional recall parameter consisting of any non-blank letter/digit character string 



WRITE MACRO 

The WRITE function transfers information from the file circular buffer to the file storage device. WRITE is 
applicable to both mass storage files and tapes. 

WRITE lfn,recall 

For mass storage files and tapes in SI format, only full PRUs are written. The size of the PRU depends on 
the storage device. Writing continues until: 

The buffer is empty. 

Data in the buffer does not fill a PRU. 
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A following WRITER request will empty the buffer. 

For tapes in S or L format, only one record is written for each request. The length of the record is 
determined by the value of the IN and OUT pointers. If the record length exceeds the MLRS field value 
■ in bits 0-23 of word 7 (lfn+6) in the FET, the job terminates with an error. 

When a WRITE function is completed on any type of file, end-of-information (EOI) is established immediately 
after the position just written. Any information that may have existed beyond that point on the file is lost. 
When the FET random bit is on, the file is positioned at EOI before writing is done. On permanent files, a 
WRITE function is permitted only at EOI. 

A REWRITE function is used to modify data in the middle of a mass storage file, the WRITE function cannot 
accomplish such action. 



The WRITE macro generates the following code. 
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WRITER MACRO 

The WRITER function causes the circular buffer to be emptied and an end-of-logical-record indicator to be 
written. For mass storage files and tape files in SI format, a short or zero-length PRU is written. For S 
and L format tape files, WRITER is equivalent to WRITE. 

WRITER lfnjev,recall 



lfn 
lev 
recall 



Logical file name. 

Optional level number 0-1 7g. Default value is 0. 

Optional recall indicator. 



WRITER is processed the same as WRITE, with the following additions. 

For mass storage files and tapes in SI format, the data in the circular buffer is written out followed by 
an end-of-logical-record marker. A zero-length PRU is created if necessary; otherwise a short PRU exists. 
If the level parameter is present, it is included, If the buffer contains no data when WRITER is issued, 
a zero-length PRU is created. If the specified level number is I7 g the system changes the WRITER 
request to a WRITEF. 
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The WRITER macro generates the following code. 
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WR1TEF MACRO 

The WRITEF function produces an end-of-partition. Any information in the buffer is written out before the 
end-of-partition is written. 

WRITEF lfn,recall 

For mass storage files and tapes in SI format, WRITEF produces a zero-length PRU of level 17g. Data in the 
buffer is writen out and terminated by a zero level end-of-logical-record before the zero-length PRU is written. 
If the buffer is empty and the last operation was a WRITE, a zero-length PRU of level is written before the 
level 17g. 

For S and L tapes, data in the buffer is written to tape and followed by a physical tape mark. 

The WRITEF macro generates the following code. 
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WPHR MACRO 

The WPHR function is applicable only to magnetic tape in SI format. It causes all information in the circular 
buffer, to a limit of 512 words, to be written as a single physical record. Data to be written to 7-track tape 
must be in internal BCD codes. Only internal to external BCD conversion is performed before writing; no 
conversion is performed for 9-track tapes. 

WPHR lm.recall 

If the buffer contains fewer than 512 (decimal) words, the IN and OUT pointers in the FET are set equal 
when writing is completed to show an empty buffer. If the buffer contains more than 512 words, only the 
first 512 words are written. The IN and OUT pointers will be set by the system to show that more data 
exists in the buffer. Status returned is 10, indicating device capacity exceeded. 

A WPHR issued for any device other than magnetic tape in SI format is ignored. A 22 status is returned to 
show an illegal function call, terminating the job. 
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The WPHR macro generates the following code. 
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WRITEN MACRO 

The WRITEN function is applicable to magnetic tape in S or L format only. It allows maximum use of the 
interrecord gap time as long as the user provides at least two records and their control words in the circular 
buffer. 

WRITEN lfn,recall 

Writing continues until: 

Buffer is empty. 
End-of-volume is encountered. 
File action error occurs. 

No action takes place if the buffer is empty. 

The user must provide a header word immediately preceding each record in the buffer. This headei is not 
physically written on the tape. Its format is: 

59 29 23 17 





UBC 




CM Words 



CM words Number of 60-bit words in the physical record 

UBC Number of bits that are not valid data in the last word 

The system compares the MLRS and UBC fields in the FET using information from this header. 

The OUT pointer is not changed to reflect the move until after each complete record has been written to 
tape. The user should not move the IN pointer beyond the header word until the header and the complete 
record are in place, or an error will result. 



7-64 



60493800 E 



The WRITEN macro generates the following code: 
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WRITOUT MACRO 

The WRITOUT function is applicable to all mass storage and tape files. It employs a user-provided working 
storage area as well as the file circular buffer; when the buffer is full, the system issues a WRITE function to 
transfer data from the buffer to the file storage device. With random indexed files, "the user has the option 
of using either WRITOUT to position a file and manage the circular buffer himself, or providing a working 
storage area and letting the system manage the buffer. Otherwise, the user deals only with data in the work- 
ing storage area; the system handles the circular buffer and both the IN and OUT pointers of the FET. 

When WRITOUT is executed, data in the working storage area is transferred to the circular buffer. No record 
boundaries are assumed, with all data placed in the buffer by WRITOUT being considered a single logical 
record. Until the user issues a WRITER or WRITEF to empty the buffer, a single record exists. The system 
empties the buffer as necessary to accommodate new data being moved into the buffer. As with the READIN 
function, the system buffers input/output with computing by checking the buffer just before returning to the 
calling program, and issuing a WRITE without recall if the buffer is more than half full. WRITE functions 
with recall are issued when it is necessary to empty the buffer before carrying out the WRITOUT request, so 
that the WRITOUT function completes before control returns to the user program. 

The amount of data transferred from the working storage area to the buffer depends on the file mode: 

For binary mode files, the entire working storage area is transferred. 

For coded mode files, trailing blanks are removed and a 12-bit zero byte is inserted in the low order 
position of a word to indicate end-of-line. 

Sequential files are written with: 

WRITOUT lfn 

A WRITER function must be used to terminate a record. If a working storage area does not exist for a 
sequential or random file, the WRITOUT is ignored with no error indication. 

An additional parameter is required when the file has indexed records. To declare the beginning of an indexed 
record, one of these forms of the macro is used: 

WRITOUT lfn,/name/ 

WRITOUT lfn,n 

/name/ Name of record 
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n Number of record; if n is 0, the number is one greater than the last number, with the first 

record being numbered 1 

To continue writing the same record, this form is used: 

WRITOUT lfn 

To terminate the record, the WRITER macro should be used, although the system issues WRITER under circum- 
stances noted beiow. 

WRITER lfn 

An alternate method of processing indexed records is to use WRITOUT with a record identifier, then fill the 
circular buffer directly and issue a WRITE request without using the working storage area. A WRITER request 
is still needed to terminate the record. 

When a WRITOUT identifying an indexed record is issued, the system performs the following. 

1. If the buffer contains data from a previous WRITOUT or the last operation was a completed write 
rather than write end-of-logical-record, a WRITER occurs. 

2. The IN and OUT pointers are set equal to indicate an empty buffer, and the FET status is set to 
show that write was completed. 

3. The random file index and the eighth word (lfn+7) of the FET are set to the correct record. 

4. The working storage area is transferred to the circular buffer as the beginning of the new record 
identified in the WRITOUT. 

5. If the buffer contains at least one PRU of data, WRITE is called. 

When a working storage area does not exist for an indexed file or the length of the area is 0, the same 
procedures occur with the omission of any transfer of data to the buffer. 

The code generated by the WRITOUT macro depends on the parameter list. For no second parameter, a 
name parameter, or number parameter, respectively, the code is: 
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REWRITE MACROS 

The functions REWRITE, REWRITER, and REWRITEF update records in existing mass storage files. A fourth 
rewrite function, WRITIN, can be used similarly to WRITOUT; it can be used in conjunction with REWRITE, as 
the WRITOUT function with WRITE, and the REWRITER function should be used to terminate the record 
rewritten. These functions do not change the total amount of mass storage assigned to the file, nor do they update 
any index which may be associated with the file. 
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the length of the original record, it offers no protection from over-writing or under-writing and does not issue diag- 
nostics when these conditions occur. The system guarantees only that a rewritten record does not extend beyond the 
file end-of-information, with writing taking place up to that point and a diagnostic issued if the program attempts to 
go beyond that point. End-of-information is never moved. The index record existing at the end of random file is not 
protected. 

Rewrite functions are similar to WRITE, WRITER, and WRITEF. Parameters for the macros are the same. 
REWRITE lfn,recall 

REWRITER lfn4ev,recall 

REWRITEF lfn,recall 

The user is responsible for knowing file structure before and after the rewrite. A minimum of one PRU is 
transferred from the circular buffer to the file each time a rewrite function is issued. Writing always begins 
at the current file position. Therefore, the user must see that the file is positioned properly before writing 
takes place. 
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The amount of information rewritten for each call depends on the amount of information in the circular 
buffer, with the minimum amount being one PRU which may include a short or zero-length PRU. When a 
system-logical-record is to be replaced with a record of the same length in a single rewirte operation, RE- 
WRITER should be used. A longer record may require REWRITE and REWRITER, depending on the buffer 



size. 



When the new record is not the size of the original record, the resulting file may have spurious records. Short 
replacement records, where the original record was contained in a single PRU, or the replacement record 
extends into the last PRU of the original record, do not cause difficulties. When the new record occupies 
fewer PRUs than the original, however, the end of the original record remains in the file. As an example con- 
sider an original 120-word record occupying a full PRU of 64 words and extending 56 words into a second 
PRU. Replacing the record with 60 words produces a short PRU in place of 64 words or original data. The 
56 words of the second PRU of the original record remain in the file, since mass storage allocation never is 
changed by a rewrite. 

A similar condition is created when the replacement record extends beyond the PRUs of the original record. 
Since the beginning of the next record in the file is overwritten, its usefulness is destroyed, but the remainder 
of the record still resides in the file. 

When REWRITEF is issued, a zero-length PRU containing a level 17g is written. If issued when the file is 
positioned at any point, two level 17 g indicators will exist on the file. 

When random files are being rewritten, the methods of writing and the results of under-writing or over-writing 
a logical record are the same as for sequential files. Index integrity can be destroyed by rewriting records of 
different lengths. The user must position the file properly before each record is rewritten. Otherwise, writing 
takes place at the current position. Subsequent rewriting operations rewrites the next record in the file, 
which is not necessarily the next index entry for the file. 

To position a random file for rewriting, the user may use one of two methods: 

Set up the FET the same as for a random read and insert the record address found by searching 
the file index into the record request/return field in the seventh word of the FET. 

For an indexed file with records identified by name or number, use the WRITIN function, which 
causes the system to search the user's index and set the necessary FET fields. 

Once the file is positioned to the beginning of a record, a REWRITE and REWRITER sequence or a WRITIN 
and REWRITER sequence can be executed without further repositioning. The record request/return field in 
the FET will be cleared by the first REWRITE or REWRITER that is issued by the calling program or 
WRITIN and remain cleared until repositioning for another record is required. 

The rewrite functions generate the following code. 
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The y and z fields depend on the specific function. The value of y is: 

002 for REWRITE 

003 for REWRITER or REWRITEF 

The value of z is: 
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224 for REWRITER 
234 for REWRITEF 



WRITIN MACRO 

The WRITIN function applicable to mass storage files is a rewrite-in-place function similar to the rewrites. 
It assumes the user has full knowledge of file structure and knows the results of his actions, as explained 
with the rewrite functions. 

WRITIN is similar to WRITOUT in that it relieves the user of the responsibility of manipulating buffer 
pointers when a working storage area is provided. When the circular buffer has been filled from the 
working storage area. WRITIN issues a REWRITE. Handling of binary and coded data is the same as for a 
WRITOUT. Parameters for WRITIN, and results of its use. are the same as for WRITOUT. 

WRITIN lfn 

WRITIN lfh,/name/ 

WRITIN lfn,n 

REWRITER is required to terminate a record, except when WRITIN or WRITOUT names another indexed 
record. In this case, a REWRITER of level is forced before the new record is begun. 

If a working storage area does not exist when WRITIN is issued to a random or sequential file, the function 
is ignored with no error indication. For an indexed file without a working storage area, however, a WRITIN 
specifying a record name or number causes file repositioning to the beginning of that record. Therefore, the 
WRITIN function is useful before REWRITE or REWRITER. 

The code generated by the WRITIN macro depends on the second parameter. For no parameter, a name 
parameter, and a number parameter, respectively, the code is: 
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POSITIONING FUNCTIONS 

Files can be repositioned forward with the SKIPF function, or repositioned in a reverse direction with BKSP, 
BKSPRU, REWIND, SKIPB, and UNLOAD. Any of these commands can be issued at any point in a logical 
record. If parity errors occur during repositioning, they are ignored. 

SKIPF Skips records forward 

SKIPB Skips records backward 

BKSP Skips back single record 

BKSPRU Skips back single physical record unit 



REWIND Skips back to beginning-of-information 

UNLOAD Skips back to beginning-of-information and unloads 

Reverse functions other than REWIND stop at the beginning of the current volume of magnetic tape. No 
status returned to the FET indicates that beginning-of-volume has been detected before the requested number 
of backspaces was completed. However, if the XP bit (bit 40 of word 2 at lfn+1) is set, the number of 
skips yet to be made will be stored in the RSC field (bits 24-41) of the FET extension. 

If a magnetic tape file is positioned immediately after a newly written record when a reverse motion function 
is issued, trailer label procedures are executed before the function is performed. Four tape marks are 
written if a trailer label format is not defined. 
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SKIPF MACRO 

SKIPF causes one or more system-iogicai-records, or physical records of an S or L tape, to be bypassed in a 
forward direction. 

SKIPF lfn,n,lev,recall 

The number of records or record groups to be skipped is specified by the n parameter; the value 1 is assumed 
if n is absent. The maximum octal value of n is 777776. If n is 777777 and the file is on magnetic tape, it 
is not repositioned. If n is 777777 and the file is on mass storage, it is positioned at end-of-information. If 
the CIO call is used instead of the CPC call, whenever n=0 it is treated as if n=l was given. 

For mass storage and SI tapes, the skip count is incremented as each level defined by the lev parameter is 
passed. Thus, a SKIPF with a count of 1 and lev of issued in the middle of a record positions the file to 
the beginning of the following record. 

The lev parameter specifies the level defining the record end; logical records are skipped until an end-of-logical 
record with a level number greater than or equal to the requested level is reached. The file is positioned 
immediately following this end-of-logical-record mark. 

If lev is absent, this field is set to zero, and the file is positioned forward n logical records or parts of records. 
If end-of-information is encountered before an end-of-logical-record with the specified level is found, the end- 
of-information status bit will be set in the FET. 

Although level numbers do not exist on S and L data format tapes, an lev parameter may be specified for 
SKIPF requests. If level number 17g is specified, a skip to end-of-partition is performed. Any other level 
number is assumed to be zero, and one record is skipped. 

A SKIPF is continued across volumes when the user processing (UP) bit is 0. If UP is set, the forward skip 
stops when end-of-volume is detected. If both UP and XP are set when end-of-volume appears before the 
skip count is fulfilled, the difference between the count requested and count made to that point will be 
returned to the RSC ficid in tue Fui extension. 

The SKIPF macro generates the following code. 
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SKIPB MACRO 

SKIPB causes one or more system-logical-records, or physical records of S and L tapes, to be bypassed in a 
reverse direction. 

SKIPB lfn,njiev,recall 
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The number of records or logical record groups to be skipped is specified by the n parameter; the value 1 is 
assumed if n is absent. When n is the maximum value of 777777 (octal), the file is rewound. 

For mass storage and SI tapes, if the level parameter is used, logical records are read backwards until a short 
PRU containing the specified level has been read. A forward read is issued, leaving the file positioned after 
this short PRU. If the file is positioned initially between logical records, the level number immediately pre- 
ceding the current position is ignored in searching for a record of the specified level. This positioning process 
is performed n times. 

Consecutive system-logical-records within a file may be organized into a group by using level number. The file 
is composed of one or more groups of logical records. This may be done by choosing a minimum level num- 
ber other than 0, assigning a larger or equal level number to the last logical record of each group, and assign- 
ing a smaller level number to all other logical records. Then SKIPB lfnjev skips the file backward to the 
beginning of the logical record group which immediately follows a logical record of level lev. 

If the level parameter is absent, this field is set to zero, and the file is positioned backward n logical records 
(or partial logical records if the SKIPB is issued in the middle of a logical record). 

If the beginning of a volume is encountered on mass storage and the UP bit is set, or if the beginning of a 
volume on magnetic tape is encountered before the requested level number is found, the request terminates 
with no indication. However, if XP is set, field RSC in the FET extension contains the count n still required 
to complete the operation. Parity errors encountered during a SKIPB operation are ignored, 

I For S and L tapes, only levels and 17 g are recognized; any other level specified is assumed 0. 
The SKIPB macro generates the following code. 
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BKSP MACRO 

BKSP causes one system-logical-record to be bypassed in a reverse direction. This function is a subset of 
SKIPB; it is included for compatibility with previous systems. 

BKSP lfn,recall 



The BKSP macro generates the following code. 
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BKSPRU MACRO 

BKSPRU causes one or more physical record units to be bypassed in a reverse direction. 
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The number of PRU's to be bypassed is indicated by n. If n does not appear, one PRU is skipped. 
The BKSPRU macro generates the following code. 
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REWIND MACRO 

REWIND positions a file to beginning-of-information. A REWIND issued for a file already rewound has no 
effect. A REWIND request for a file on a device that cannot be rewound causes a 22 status indicating an 
illegal function to be returned to the FET. 

REWIND lfn,recall 

Labeled tapes are positioned to beginning-of-information ahead of the label group. Subsequent forward motion 
requests result in the label being skipped before the tape is read or written. 

For unlabeled multi-volume tapes, a REWIND causes the current volume to be rewound. For labeled multi- 
volume, singie-iue tapes, a khwiinl> causes uic uuncm vuiumc iu uc icwuunu <inu «»v y^hmhw n^.^* «. -~ 
system tables to be set to 1. A subsequent forward motion causes the label to be read and compared with 
the system tables, and the operator is notified if the current volume is not number 1. 

For multi-file labeled tapes, a REWIND issued for a file causes positioning to the beginning of that file. If 
necessary, the operator is instructed to mount the previous volume. A REWIND that references a multi-file 
name is illegal; the job terminates. 

The REWIND macro generates the following code. 



59 


47 


41 


39 


29 


17 C 


SA1 


Ifn 


RJ 


CPC 


000003 





r 





000050 



60493800 E 



7-73 



UNLOAD MACRO 

UNLOAD operates in a manner similar to REWIND, except that it only affects the current volume of tape. 
UNLOAD cannot override an IU inhibit unload parameter on a REQUEST control statement. Otherwise, a 
tape file is rewound and unloaded. 

UNLOAD lfn,recall 

The UNLOAD macro generates the following code. 



47 



41 39 



29 



17 



SA1 


Ifn 


RJ 


CPC 


000003 





r 





000060 



FILE DISPOSITION 

Files can be disposed of in several ways in addition to the disposition associated with special file names. 

The file can be destroyed by the EVICT function. 

The file can be routed to an output device at the central site or a remote terminal station with the 
ROUTE or DISPOSE functions. 

Files on public device sets that have not been named in a ROUTE or DISPOSE control statement or macro, 
or have not been equated to standard output file names such as OUTPUT or PUNCH, disappear upon job 
termination. Permanent files, of course, are retained under permanent file manager disposition. 

It is not possible to dispose of a file by setting a disposition code directly in the FET. 

EVICT MACRO 

The EVICT function declares that contents of file Ifn are to be discarded. 
EVICT lfn,recall 

When a file on a public device set is evicted, all space occupied by that file is released to the system. The 
space immediately becomes available for any system purpose or reassignment. An EVICT function directed to 
a permanent file is ignored; a dayfile message is issued and the job continues normally. 

When a file on a magnetic tape is evicted, the tape is rewound and set to new status, thus declaring that the 
data and label are no longer valid and cannot be read by the job. If the file was declared to be labeled a 
new header label is written on any subsequent file reference. However, the evicted file is not overwritten 
without operator authorization if the file expiration date has not passed. 
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If an EVICT function is directed to a member of a multi-File set, the set already must have been positioned 
at that file. Eviction of a member file also implies eviction of all files occupying higher numbered positions. 

The logical file name used in the EVICT function is retained and cannot be used for a file on another device. 

EVICT is undefined and, therefore, illegal on unit record equipment. A fatal error results if it is tried. 






59 



47 



41 39 



SA1 



000003 



Ifn 



29 



17 



RJ 



CPC 



000114 



DISPOSE MACRO 

With the dispose function, a central processor program may declare a disposition code and initiate termination 
processing for a file. Files either can be released or sent to the output queue of completed files, as explained 
with the DISPOSE control statement. The dispose function can be used only for files that are resident on 
queue devices. 

DISPOSE lfn,*x=ky,recall 



lfn 



Logical file name. 

Optional end-of-job disposition indicator. 
Two-character disposition mnemonic. 
Mnemonic Definition 



PR 

LR 

LS 

LT 

PB 

PU 

P8 

FRt 

FLt 

Pjt 

HRt 
HLt 



Print on any available printer 

Print on 580-12 printer 
Print on 580-16 printer 
Print on 580-20 printer 
Punch standard binary format 
Punch Hollerith format 
Punch free-form binary format 
Print on microfilm recorder 
Plot on microfilm recorder 
Plot 

Print on hardcopy device 
Plot on hardcopy device 



t Supporting drivers must be supplied by the installation. 
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Optional site indicator; y must follow: 



C 

I 



Central site 
INTERCOM terminal 



y Qualifier to k; y cannot be used without k. 

If k is C, two-character alphanumeric installation defined identifier of special forms or 

fMftAr 

UttJIVI ■ 

If k is 1, two-character user identification, 
recall Optional character indicating recall. 

If only lfn is given, the file is released, with mass storage and table references being removed. 
The code generated by the DISPOSE macro is: 

59 47 41 39 29 23 15 



EQ 



11 



*+2 



lfn 



The following is set in X6 with a subsequent call to SYS=. 



DSP 



kk 



'-2 



z 


Set to 1 when 


♦is 


used. 


kk 


Site indicator: 








00 




none 




01 




central site 




10 




INTERCOM terminal 



The completion bit (C) is set to 1 by DSP when the requested function is complete. 

ROUTE MACRO 

The ROUTE macro places a file in an input or output queue, evicts a file, or specifies attributes the file has 
when it is placed in an output queue. ROUTE has all the capabilities of DISPOSE. See the ROUTE control 
statement for a complete description of the ROUTE capabilities. The user must construct a parameter list in 
the format described below before calling the ROUTE macro. The file being processed must not be the 
INPUT file, but it must be resident on a queue device. 
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ROUTE tag,recall 

tag Address of the ROUTE parameter list, 

recall Optional non-blank character indicating auto recall. 

Parameter List Format: 



tag+0 
tag+1 



tag+2 

tag+3 
tag+4 

Word 

tag+0 



tag+1 



59 




M 


41 


35 


23 




9 


17 


13 




11 





Logical File Name 


Error 
Code 


Unused 


A 


0000 


Forms Code/ 
INPUT Flags 


Disposition 
Code 


E 
C 


t 


1 
C 


Flags 


Reserved 


Station ID- 
Destination 


Unused 


TID 


File Identifier (FID) 


Unused B 


Priority 


Spacing 
Code 
(Output 
Only) 


Reserved 


t 


Repeat 
Count 


Unused 



Bits 

18-59 

12-17 

1-11 


48-59 

36-47 



Field 

Logical File 

Name 



Error Code 



Unused 
A 

Zeros 



Forms Code/ 
Input Flags 



Description 

lfn of file to be routed: must be mass storage file, not a 
permanent file, cannot reside on a dismountable device, must 
have at least read permission. 

Code returned by system when bit 12 of flag field is set, as 
noted below. 



Completion bit. Must be zero when macro is issued; system 
sets to one when function is complete. 

Twelve bits of zero. Allows compatibility with previous 
callers of DSP. The old calling sequence put the lfn in tag+1. 

Two display code letters or digits identifying forms to be used 
for this file. Default is standard forms. If the file is to be 
routed to an input queue, this field is defined as: 



Bit 


Definition 


47 


Unused 


46 


Unused 


45 


Do not catalog INPUT file 



t Unused 
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Word 

tag+1 



Bits 



Field 



24-35 



21-23 



Disposition 
Code 

EC 



Description 

Bit Definition 

44 Reserved for use by system jobs 

43 Send file to input queue even if job statement error 

42 Use dependency count 

36-41 Dependency count 

Disposition code mnemonic in display code. 



External characteristics code translated as follows: 



Value 
(octal) 



1 
2 
3 
4 
5 
6 
7 



Print File 
EC (default) 



EC=B4 
EC=B6 
EC=A6 
EC=A9 
Reserved for installations 



Punch File 

EC (default) 

EC=SB 

EC=80COL 

EC=026 
EC=029 
EC=ASCII 



20 
18-19 



Unused 
IC 



0-17 



Flag Bits 



Internal characteristic code translated as follows: 



Value 
(octal) 


1 
2 
3 



IC or IC=DIS - Display code (default) 

IC=ASCII 

IC=BIN binary 

IOTRANS - Transparent (INTERCOM 5) 



Indicate specified parameters: 



Bit 


Meaning 


17 


File name assigned by system is returned at tag 




word bit 18-59 


16 


Unused 


15 


Spacing code 


14 


Repeat count 


13 


Reserved for system job 


12 


No dayfile message; return error code in bits 




12-17 of first-word of parameter list 


11 


Reserved for system jobs 


10 


Forms code 


9 


Priority 
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Word 

tag+1 



Bits 



Field 



tag+2 



tag+3 



42-59 


Reserved 


24-41 


Station ID- 




Destination 


12-23 


Unused 


0-11 


TID 



18-59 



FID 



Description 

Bit Meaning 



8 
7 
6 

5 
4 
3 
2 
1 




Internal characteristics 

External characteristics 

FID=* System appends two unique sequence 

characters to file identifier 

FID - System uses FID specified in tag+3, bits 18-59 

Disposition code 

Route to remote station 

TID is specified 

Route to central site 

End-of-job (deferred ROUTE) 



Used by system jobs; otherwise, set to binary zero. 

Display code destination ID. The file is processed by the 
system with this logical identifier. 



Display code identifier of INTERCOM terminal to receive 
the file. 

If the calling job was not loaded completely from the system 
library, only a maximum of 5 characters may be used to 
specify FID. The additional 2-character sequence number is 
determined by flag bits 5 and 6. Seven characters may be 
specified by calling jobs loaded completely from the system 
library. 



13-17 



Unused 



tag+4 



12 
0-11 

18-59 
54-59 

17 



B 

Priority 

Reserved 



Use the priority in bits 0-11. 

Priority for an interactively routed output file being routed to 
the routing terminal. 

For use by system jobs only. 



Spacing Code (SC) 580 PFC printer. Spacing array to be loaded with the file 
(output only). 

Unused 



12-16 Repeat Count Repeat count. 

0-1 1 Unused 

When an error occurs in processing a ROUTE macro, either a dayfile message explaining the error is issued, or 
an error code is returned in bits 12-17 of the first word (tag+0) in the parameter list. If bit 12 of the flag 
field is set, an error code is returned, and no dayfile message is. issued. If bit 12 is not set, a dayfile message 
is issued, and no error code is returned. If the address of the parameter list is outside the field length of the 
job or if the complete bit is set when the macro is issued, the job aborts. For all other errors, the ROUTE 
macro is not executed, but processing continues. 
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When a diagnostic is issued for the ROUTE macro, the message ERROR IN ROUTE FUNCTION LFN= is 
issued before the message describing the error. If the function completes successfully, no message is issued; 
the error code field is set to binary zero. 

Error Code 

(octal) Message 

01 INVALID LFN - DSP 

02 CANT ROUTE NON ALLOCATABLE EQP 

03 CANT ROUTE PERM FILE 

04 NO PERMISSION TO ROUTE THIS FILE 

05 ROUTE TO INPUT NOT IMMEDIATE - IGNORED 

06 IMMEDIATE ROUTING - NO FILE - IGNORED 

07 INVALID DISPOSITION CODE - ROUTING IGNORED 

10 INVALID FID ROUTING IGNORED 

1 1 DSP ABORTED BY SYSTEM 

12 DSP PARAMETER OUTSIDE FL 

13 PRIORITY SPECIFICATION IGNORED 

15 E1200 SPECIFIED - INTERCOM USED (DSP) 

16 CAN NOT ROUTE INPUT FILE 

17 DSP COMPLETE BIT ALREADY SET 

20 FILE ON DEMOUNTABLE DEVICE - ROUTING IGNORED 

21 TID NOT ALPHANUMERIC - ROUTING IGNORED 

22 FORMS CODE NOT ALPHANUMERIC - ROUTING IGNORED 

23 INVALID LINK TYPE - ROUTING IGNORED (DSP) 

24 FILE NOT ON QUEUE DEVICE - ROUTE IGNORED 

25 PRE-DAYFILE LFN AND NO DOIN - ROUTE IGNORED 

26 PRE-DAYFILE FILE NOT FOUND - ROUTE IGNORED 
See the NOS/BE Diagnostic Handbook for a description of each message. 
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PERMANENT FILE FUNCTIONS 

Permanent file functions are those defined by control statements with the following names. 



ATTACH PURGE 
CATALOG RENAME 

Information applicable to a control statement call is also applicable to a call through a permanent file macro. 
In addition, an FDB and PERM macro are available. 

Each permanent file macro expansion contains an RA+1 call to a permanent file program. Parameters 
necessary for execution of a function are contained in the file definition block (FDB) table within the user's 
field length. 



FDB MACRO 

The macro for generating an FDB has the format: 

fdbaddr FDB lfn,pfn,parameter list 

fdbaddr is the symbol to be associated with the word in the FDB that contains the lfn; it must be present in 
the location field. Parameters are separated by commas and terminated by a blank. They may include any 
of those indicated by the two-letter codes described for control statements. 

The field to the right of the macro name, FDB, is identical to that which could be on a control statement. 
Parameters are entered into the FDB as they are encountered in the list. The FDB is generated in-line during 
assembly whenever the macro is called. 

A user specifies the intent of a particular function by specifying parameters. If they do not clearly define the 
function request, the permanent file manager attempts to inform the user of the unknown information by the 
following means. 

Modification of the file definition block will be done when an illegal parameter is correctable. For 
example, if an incorrect cycle number is encountered on a CATALOG function, the actual cycle 
number is returned in the FDB. If code is not successful, error codes may be returned in the FDB. 

A job dayfile message is issued to the job dayfile unless the RT or RC parameter is specified in the 
function call that specifies the FDB. 
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The FDB generated by the macro has the form: 
59 



fdbaddr 



Field 



Mr.) 



17 



11 8 5 



Permanent File Name 
(Display Code Left Justified Zero Filled) 



Ifn (Left Justified Zero Filled) 



Return 
Code 



status 



Parameter Value (Right Justified Zero Filled) 



Parameter Value (Right Justified Zero Filled) 



Ml) 




1 
2 
3 
4 
5 



k(2) 



Parameter Value (Right Justified Zero Filled) 



67 



Mn) I 4 +n 



Unused 



0000 tt 



Description 

Parameter identifier in octal or display code: 



Description 



Value 


Keyword 


(Octal) 


Parameter 


00 




02 


RP 


03 


CY 


04 


TK 


05 


CN 


06 


MD 


07 


EX 


10 


RD 


11 


MR 


13 


XR 


14 


ID 


16 


AC 


17 


EC 


20) 




24 f 


PW 


25 


FO 


31 


LC 



End of FDB list 

Retention period days 

Cycle number 

Turnkey password (display code) 

Control password (display code) 

Modify password (display code) 

Extend password (display code) 

Read password (display code) 

Multi-read parameter 

Control, modify, extend password (display code) 

Owner identification (display code) 

Account (display code) 

ECS buffering (display code) 

Password submitted (display code) 

File organization (display code) 
Lowest cycle 



*The SN parameter value is left justified, zero-filled. 
jttThe system only checks bits 0-11 in this word. 
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Field 



Description 



Value 
(Octal) 

32 

33 
An 

43 
53 



Keyword 
Parameter 

ST 
RW 

CM 

RB 
UV 



Description 

Station ID (display code) 
Multi-read with single rewrite 

CarnomA f/Kcrtlov /*rtrlA 1*»ft incftflArll 

1JVV1UUUV l VJU*i3 ^i-J-W. J WWW) i-VJ.» JWWVXIivw; 

PURGE RB conflict parameter 
Universal password 



Status 



Status bits: 



Return 
Code 



Bit 


1 
2-5 



6 

7 
8 



Meaning 

Complete bit 

Unused 

Function code bits 

0010 ATTACH 1010 RENAME 

0100 CATALOG 1100 PERM 

0110 EXTEND 0111 ALTER 

1000 PURGE 

Set if RC or RT not specified; issue dayfile message; all errors are fatal 

Set if RT specified 

Set if NR specified 



60493800 E 



Return codes: 

Value 

(Octal) Meaning 

000 Function successful 

001 PFN/ID error 

002 lfn already in use 

003 Unknown lfn 

004 No room for extra cycle (limit is five) 

005 Permanent file catalog (PFC) full 

006 No lfn or pfn 

007 Not used 

010 Latest index not written for a random file 

011 File not on PF device 

012 File not cataloged, SN=setname (setname is the set name of the device set 
searched) 

013 Archive retrieval aborted 

014 Bad LPF communication 

015 Cycle number limit reached; maximum value of cycle number is 999. 

016 Permanent file directory (PFD) full 

017 Function attempted on non-permanent file 

020 Function attempted on non-local file 

021 Improper archive retrieval call 

022 File never assigned to a device 

023 Cycle incomplete or dumped 

024 PF already attached 

7-83 



Field 



Description 



Value 




(Octal) 


Meaning 


025 


File archived 


026 


Illegal character in FDB parameter 


027 


Illegal lfn 


030 


File dumped 


031 


Illegal function code 


032 


Purge attempt ignored; use RB parameter 


033 


ALTER needs exclusive access 


034 


FDB is too large 


035 


File already in system 


036 


No APF space 


037 


Permission conflicts 


040 


Illegal setname specified 


041 


Device set not mounted at control point 


042 


RBT chain too large for PFC 


043 


File resides on unavailable device 


044-067 


Not used 


070 


PFM stopped by system 


071 


Incorrect permission 


072 


File definition block address invalid (not returned to FDB) 


073 


I/O error on PFD/PFC read/write 


074 


ST parameter illegal with private device set (MMF-PURGE) 



On control statement requests, all errors are fatal; on macro requests, unless the RC parameter is specified, the 
job is terminated. Any job that attempts a privacy breach is terminated. Codes greater than 70 octal are fatal. 
All internal permanent file malfunctions are system errors that cause job termination. 



FUNCTION MACROS 

The macro function call is of the following form. 

function fdbaddr,RC,RT,NR 

function Any permanent file function, such as CATALOG. 

fdbaddr Symbol on FDB macro. 

RC Optional parameter that causes return codes to be available in FDB . 

RT Optional parameter that inhibits any permanent file queueing. 

NR Optional parameter that inhibits auto recall. 

All permanent file macro calls are issued with auto recall unless NR is present. In this case, it is possible for 
the central processor program to test the completion bit in the FDB to determine whether the function has 
completed. 
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The RT parameter can be used only at the macro level, unless the user constructs the FDB himself. Jobs 
attempting permanent file attaches queue for the requested file if the RT parameter is not specified when: 

File is unavailable (job requesting file wants exclusive access, or job using the file has exclusive access). 

Attached permanent file table is full. 

Archived file (a permanent file stored on tape rather than mass storage) is temporarily unavailable. ATTACH 
will set up a LOADPF job to be run. The job requesting the attach will be swapped out until the file is | 
available. 

When EXTEND is used on an indexed file, the current index must be rewritten at the end of the file by the 
user to invalidate any prior index. This must be done prior to the EXTEND function. When an EXTEND 
function is requested for a random file, nothing must have been written on the file since the index was last 
written. 

PERM MACRO 

PERM, available only as a system macro, allows a running program to determine what permissions have been 
granted to a file and whether or not the file is permanent. The macro format is: 

PERM fdbaddr,RC,NR 

The only required parameter is the lfn, which should be supplied in the FDB. This lfn should reference a file 
available to the job calling PERM. 

The 5-bit code is returned to the user as the return code in the FDB (bits 9-13 in fdbaddr). The rightmost 4 
bits are the permission bits. The octal codes are: 

10 CONTROL 
04 MODIFY 

02 EXTEND 
01 READ 

The leftmost bit of the 5-bit code is a flag. If it is 0, the lfn references an attached permanent file unless 
the entire 5-bit code is equal to 0. If the entire code is 0, the lfn is unknown to the job calling PERM 
since a permanent file cannot be attached without permissions. A 1 in the leftmost bit indicates a local file. 



SYSTEM TEXTS 

System texts provide commonly used macro, micro, and symbol definitions for use in COMPASS source 
programs. The system provides several system text overlays, which are loaded by COMPASS from the system 
libraries when specified by S or G parameters on the COMPASS control statements. S or G parameters can 
also be used on FTN control statements when FORTRAN Extended source programs contain intermixed 
COMPASS subprograms. Up to seven system texts can be specified, each by a different S or G parameter, 
for a given assembler run. Most system texts are made up of UPDATE common decks described below. 
System texts are constructed as part of the installation process described in the NOS/BE Installation 
Handbook. 
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COMMON DECKS 

ACTCOM-CPU system action request macros: 



IXi Xj/Xk 


CONTRLC 


GETJCI 


RECALL 


STATUS 


IXi Xj/Xk,Bn 


DATE 


IOTIME 


RECOVR 


SYSCOM 


ABORT 


DISPOSE 


JDATE 


REQUEST 


SYSTEM 


ACQUIRE 


ENDRUN 


LOADREQ 


ROUTE 


TIME 


CHECK?! 


17»TT Tyeirr* * rr* 

rmioiAi 


MEMORY 


RTIME 


TRANSF 


CLOCK 


FILINFO 
GETACT 


MESSAGE 


SETJCI 


VERIFYJ 


CIOCOM - Codes, symbols, macros and installation parameters associated with magnetic tape processing and 


tape scheduling. 









CMRDEF - Symbols, macros and installation parameters for Monitor and the integrated scheduler. 

COMACIO - CPU input/output macros. 

COMAFET - File environment table generation macros: 



FILEB 
FILEC 



LABEL 



RFILEB 
RFILEC 



COMAREG - Replacement for R= pseudo-instruction. 

COMSRAS - System communication symbols: 

Contains definitions of the system communications symbols described in this section under the heading 
SYSTEM MACRO. 

CPSYS - Input/output macros using CPC: 



BKSP 


READC 


REWRITEF 


WRITE 


BKSPRU 


READIN 


REWRITER 


WRITEC 


CLOSE 


READN 


RPHR 


WRITEN 


CLOSER 


READNS 


SKIPB 


WRITEF 


EVICT 


READSKP 


SKIPF 


WRITER 


OPEN 


REWIND 


UNLOAD 


WRITIN 


POSMF 


REWRITE 


WPHR 


WRITOUT 


READ 









ECSCOM - ECS and ECS link installation parameters; ECS flag register function macros. 

ECSDEF - Codes, macros, symbol definitions and storage descriptors for ECS processing and the ECS Link. 

IPARAMS - Installation parameters: 

Contains installation parameters as symbol and micro definitions. 
LMACOM - Loader request macros: 

Contains LOADER and LDREQ. 
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PFCOM - Permanent file macros: 



ALTER 


EXTEND 


PURGE 


GETPF 


ATTACH 


FDB 


RENAME 


SAVEPF 


r at at nr. 


PFRM 







PPSYS - Peripheral processor system definitions: 

Contains many system symbols and micros, and the following macros. 



ADK 


CRI 


LDK 


BIT 


ENM 


PPENTRY 


CEQU 


JOBCARD 


SBK 


CMICRO 


LDCA 


UJK 



SCHCOM - Integrated scheduler macros: 



CI SO 


SCHLOK 


SCHSTOR 


ENTRY34 


SCHSAVE 


STREQ 


LDW 







SISICOM - SCOPE indexed sequential macros: 



ACCESSK 


OPENOLD 


SETBLKI 


ACCESSN 


REPLACE 


SETCOLL 


DELETE 


REPOS 


SETERR 


FORCEW 


SEEKL 


SETFET 


INSERT 


SEEKS 


SETKEY 


OPENNEW 


SETBLKD 


TERMNAT 



STATCOM - Station interface definitions: 

Contains definition of interface to the station control point and definition of codes used in message 
requests. 

6RMCOM - CDC CYBER Record Manager definitions: 

Contains macro, micro, and symbol definitions for user programs that use CDC CYBER Record Manager. 
SSYS - System control point macros and definitions. 

TEXT OVERLAYS 

The system text overlays contain various combinations of the common decks, as shown below. When the 
multimainframe module is present and IP.SRMS=1, an additional system text (SRMSTXT) is cataloged. 
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CMRTEXT System text for assembling central memory resident segments separately from CMR. 

Common decks IPARAMS, SSYS, ECS COM, CIOCOM, CMRDEF, and ECSDEF. 

CPCTEXT System text for central processor programs using CPC. 

Common decks ACTCOM, COMAFET, COMSRAS, CPSYS, and SISICOM. 

CPUTEXT System text containing all system macros, micros, and symbols for COMPASS CPU pro- 

grams that use the CIO= communication routine for I/O and run under the CDC CYBER 
operating system. 

Common decks ACTCOM, COMACIO, COMAFET, COMAREG, and COMSRAS. 
IOTEXT System text for central processor programs using CDC CYBER Record Manager. 

Common decks ACTCOM, COMSRAS, and 6RMCOM. 
IPTEXT Installation parameter system text. 

Contains a single macro, IPARAMS, whose body is the IPARAMS common deck. 
LDRTEXT System text for central processor programs using CDC CYBER Loader. 

Common deck LMACOM. 
PFMTEXT System text for central processor programs using permanent files. 

Common deck PFCOM. 
PPTEXT System text for peripheral processor programs. 

Common decks COMSRAS and PPSYS. 

SCHTEXT System text for central and peripheral processor programs interfacing with the integrated 

scheduler. 

Common deck SCHCOM. 

SCPTEXT. System text for central and peripheral processor programs in the operating system. 

Common decks ACTCOM, COMAFET, COMSRAS, CPSYS, and PPSYS. 

SDDTEXT System text containing two macros, PPUDMP and C1DD, that provide the interface 

between PP programs and the dynamic dump feature. 

SSYTEXT System text for system control point subsystem programs. 

Common deck SSYS. 
STATEXT System text of station interface definition for DSD and INTERCOM. 

Common deck STATCOM. 

SYSTEXT System text for central processor programs. 

This is the default system text used by COMPASS when no S or G parameters are 
specified. It can be identical to either CPCTEXT or IOTEXT, at installation option. In 
the released system, SYSTEXT is equal to IOTEXT. 

SRMSTXT Cataloged as an additional system text when multi-mainframe shared RMS is installed. 
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The following additional system texts are provided by product set members. 

ALGTEXT Contains COMPASS coded macros used to expand application areas of ALGOL. 

FTNMAC Contains macros used by COMPASS object programs produced by the FORTRAN Extended 

compiler (FTN). 

SMTEXT Contains macros for central processor programs that call Sort/Merge. 

RMERTXT Contains CDC CYBER Record Manager error dictionary. 
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STANDARD CHARACTER SETS 



COntrOl Lfeta Operating SySLCIUS UllCI U1C lUUUWUlg fOiiauuiw Ul » u«uv wnuaviwi aw. 

CDC 64-character set 

CDC 63-character set 

ASCII 64-character set 

ASCII 63-character set 

The set in use at a particular installation was specified when the operating system was installed. 

Depending on another installation option, the system assumes an input deck has been punched either in 026 
or in 029 mode (regardless of the character set in use). Under NOS/BE 1, the alternate mode can be 
specified by a 26 or 29 punched in columns 79 and 80 of the job statement or any 7/8/9 card. The 
specified mode remains in effect through the end of the job unless it is reset by specification of the alter- 
nate mode on a subsequent 7/8/9 card. 

Graphic character representation appearing at a terminal or printer depends on the installation character set 
and the terminal type. Characters shown in the CDC graphic column of the standard character set table 
are applicable to BCD terminals; ASCII graphic characters are applicable to ASCII-CRT and ASCII-TTY 
terminals. 
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ttln installations using a 63-graphic set, display code 00 has no associated graphic or card code; display code 63 is the colon (8-2 punch). 
The % graphic and related card codes do not exist and translations from ASCII/EBCDIC % yield a blank (55 8 ). 
tttThe alternate Hollerith (026) and ASCII (029) punches are accepted for input only. 
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CONTROL DATA CHARACTER SETS 
SHOWING TRANSLATIONS BETWEEN DISPLAY CODE AND ASCM/EBCDIC 



DISPLAY 
CODE 


ASCII 

UPPER LOWER 
CASE CASE 


EBCDIC 

UPPER LOWER 
CASE CASE 




DISPLAY 
CODE 


ASCII 

UPPER LOWER 
CASE CASE 


EBCDIC 

UPPER LOWER 
CASE CASE 


OCTAL 


CH 


CH 


HEX 


CH 


HEX 


CH 


HEX 


CH 


HEX 




OCTAL 


CH 


CH 


HEX 


CH 


HEX 


CH 


HEX 


CH 


HEX 


00 






3A 


SUB 


1A 




7A 


SUB 


3F 


40 


5 


5 


35 


NAK 


15 


5 


F5 


NAK 


30 


01 


A 


A 


41 


a 


61 


A 


C1 


a 


81 




41 


6 


6 


36 


SYN 


16 


6 


F6 


SYN 


32 


02 


B 


B 


42 


b 


62 


B 


C2 


b 


82 




42 


7 


7 


37 


ETB 


17 


7 


F7 


ETB 


26 


03 


C 


C 


43 


c 


63 


C 


C3 


c 


83 




43 


8 


8 


38 


CAN 


18 


8 


F8 


CAN 


18 


00 


D 


D 


44 


d 


64 


D 


C4 


d 


84 




44 


9 


9 


39 


EM 


19 


9 


F9 


EM 


19 


05 


E 


E 


45 


e 


65 


E 


C5 


e 


85 




45 


+ 


+ 


2B 


VT 


OB 


+ 


4E 


VT 


OB 


06 


F 


F 


46 


f 


66 


f 


C6 


f 


86 




46 


- 


- 


20 


CR 


OD 


- 


60 


CR 


00 


07 


G 


G 


47 


g 


67 


G 


C7 


9 


87 




47 


• 


• 


2A 


LF 


OA 


• 


5C 


LF 


25 


10 


H 


H 


48 


h 


68 


H 


C8 


h 


88 




50 


/ 


/ 


2F 


SI 


OF 


/ 


61 


SI 


OF 


11 


1 


1 


49 


i 


69 


1 


C9 


i 


89 




51 


( 


1 


28 


BS 


08 


( 


4D 


BS 


16 


12 


J 


J 


4A 


i 


6A 


J 


D1 


i 


91 




52 


1 


) 


29 


HT 


09 


1 


50 


HT 


05 


13 


K 


K 


4B 


k 


6B 


K 


D2 


k 


92 




53 


S 


S 


24 


EOT 


04 


S 


5B 


EOT 


37 


14 


L 


L 


4C 


1 


6C 


L 


D3 


1 


93 




54. 


= 




3D 


GS 


1D 


- 


7E 


IGS 


1D 


15 


M 


M 


4D 


m 


6D 


M 


04 


m 


94 j 


55 


SP 


SP 


20 


NUL 


00 


SP 


40 


NUL 


00 


16 


N 


N 


4E 


n 


6E 


N 


D5 


n 


95 




56 






2C 


FF 


oc 




6B 


FF 


OC 


17 








4F 


G 


6F 


O 


D6 





96 




57 






2E 


SO 


OE 




4B 


SO 


OE 


20 


P 


P i 50 


P 


70 


P 


07 


P 


97 




60 


* = 


= 


23 


ETX 


03 


= 


7B 


ETX 


03 


21 


Q 


Q ! 51 


q 


71 


Q 


D8 


q 


98 




61 


I 


i 


5B 


FS 


1C 


ft 


4A 


IFS 


1C 


22 


R 


R 


52 


r 


72 


R 


D9 


r 


99 




62 


1 


) 


5D 


SOH 


01 


1 


5A 


SOH 


01 


23 


S 


S 


53 


s 


73 


S 


E2 


s 


A2 




63 


% 


% 


25 


ENQ 


05 


% 


6C 


ENQ 


2D 


24 


T 


T 


54 


t 


74 


T 


E3 


t 


A3 




64 


* " 




22 


STX 


02 




7F 


STX 


02 


25 


U 


U 


55 


u 


75 


U 


E4 


u 


A4 




65 


- 




5F 


DEL 


7F 




6D 


DEL 


07 


26 


V 


V 


56 


v 


76 


V 


E5 


V 


A6 




66 


v ! 


! 


21 


f 


70 


1 


4F 


1 


00 


27 


w 


w 


57 


w 


77 


w 


E6 


W 


A6 




67 


A & 


& 


26 


ACK 


06 


& 


50 


ACK 


2E 


3G 


X 


X 


58 


* 


78 


X 


E7 


X 


A7 




70 


f 




27 


BEL 


07 


■ 


70 


BEL 


2F 


31 


Y 


Y 


59 


V 


79 


Y 


E8 


V 


A8 




71 


I ? 


> 


3F 


US 


IF 


> 


6F 


IUS 


IF 


32 


z 


Z 


5A 


z 


7A 


z 


E9 


z 


A9 




72 


< 


< 


X 


/ 


7B 


< 


4C 


| 


CO 


33 








30 


OLE 


10 





FO 


DLE 


10 




73 


> 


> 


3E 


RS 


IE 




6E 


IRS 


IE 


34 


1 


1 


31 


DC1 


11 


1 


Fl 


DC1 


11 




74 


< <S> 


<a 


40 


■ 


60 


@ 


7C 


■ 


79 


35 


2 


2 


32 


OC2 


12 


2 


F2 


OC2 


12 




76 


> \ 


V 


5C 


1 


7 C : 


X 


EO 


1 


6A 


36 


3 


3 


33 


DC3 


13 


3 


F3 


TM 


13 




76 




~ i 5E 


7E 




5F 


- j Al 


37 


4 


4 


34 


DC4 


14 


4 


F4 


DC4 


3C 




77 




= | 33 


ESC 1 IB 

i 


. 


5E 


ESC j 27 



The terms "upper case" and "lower case" apply only to the case con- 
versions, and do not necessarily reflect any true "case". 
When translating from Display Code to ASCII/EBCDIC, the "upper 
case" equivalent character is taken. 

When translating from ASCII/EBCDIC to Display Code, the "upper 
case" and "lower case" characters fold together to a single Display 
Code equivalent character. 

All ASCII and EBCDIC codes not listed are translated to Display Code 
55<SP|. 



5. Where two Display Code graphics are shown for a single octal code, 
the leftmost graphic corresponds to the CDC 64-character set (system 
assembled with IP.CSET set to C64.1t, and the rightmost graphic cor- 
responds to the CDC 64-character ASCII subset (system assembled with 
iP.CSET set to C64.2). 

6. In a 63-character set system, the display code for the : graphic is 63. 
The % character does not exist, and translations from ASCII/EBCDIC % 
or ENQ yield blank (553). 
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GLOSSARY B 



Absolute Address 

The actual physical location of a word in central memory. Contrast with relative address. 

AUocatable Device 

A storage device that can be shared by more than one job. 

Attach 

To make a permanent file accessible to a job by specifying the proper permanent file identification 
and passwords. 

Catalog 

To place a file under jurisdiction of the permanent file manager, making it a permanent file. 

Central Memory Resident (CMR) 

Low core area of central memory reserved for tables, pointers, and subroutines necessary for operation 
of the operating system. 

COMPASS 

The assembly language of the CDC CYBER 170, CYBER 70, and 6000 Series computers. 

Control Points 

The concept by which the multiprogramming capability of CDC CYBER 170, CYBER 70, and 6000 

kjviivo vv^iul/ui^io xa VA^iuikvUi tTiivii u vuuuwi j/vuiv uwiiiuvi io udoigiivu i.v u jw, vi.j.<ii. J*-'*-' *« ouuvukwu 

some of the system resources, and it becomes eligible for assignment to the central process or for 
execution. 

Control Statement 

An instruction to the operating system or its loader. It is found in a section at the beginning of a 
job deck. 

CDC CYBER Control Language (CCL) 

A group of control statements and commands that manipulate all control statements. With CCL, the 
user can conditionally skip or process control statements, process and reprocess a group of control 
statements, and process control statements in a file other than the job file. CCL is common to both 
NOS/BE and SCOPE 2 and is virtually identical on both systems. 

CDC CYBER Record Manager 

A software package running under the NOS 1 and NOS/BE 1 operating systems that allows a variety of 
record types, blocking types, and file organizations to be created and accessed. The execution time 
input/output of COBOL 4, COBOL 5, FORTRAN Extended 4, Sort/Merge 4, ALGOL 4, and the 
DMS-170 products is implemented through CDC CYBER Record Manager. Neither the input/output of 
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the NOS/BE 1 operating system nor any of the system utilities such as COPY or SKIPF is implemented 
through CDC CYBER Record Manager. All CDC CYBER Record Manager file processing requests 
ultimately pass through the operating system input/output routines. SCOPE 2 record manager performs 
input/output for the SCOPE 2 operating system and its products. SCOPE 2 record manager is similar 
in capabilities and use to CDC CYBER Record Manager. 

Dayfile 

A chronological system permanent file, maintained on a permanent file device, which forms an account- 
ing and job history file. Entries, called dayfile messages, are generated by operator action or by the 
system when control statements are processed or other significant action occurs. The system dayfile 
has entries for the entire system. Every job receives a job dayfile with entries pertinent to that job. 

Deadstart 

The process of initializing the system by loading the system library programs and any of the product 
set from magnetic tape or a public device. Deadstart recovery is re-initialization after system failure. 

Default 

A system-supplied parameter value or name used when a value or name is not supplied by the user. 

Dependency Count 

A number established by the user with the Dyn parameter on a job statement and decremented by 
other jobs in the dependency string. The job is not run until the count reaches zero. 

Dependent Job 

A job which depends on the execution of other jobs before it can be run. It cannot be run until its 
dependency count is zero. 

Device Set 

A group of rotating mass storage devices. No device can belong to more than one device set. Every 
file must be contained within one device set, but can be on different devices in that device set. 

Device Set Member 

A rotating mass storage device belonging to a device set. 

Device Type Code (dt) 

An optional parameter on REQUEST statement or macro which specifies the type of device on which 
the named file is to be stored. It can encompass a group of parameters to define the device charac- 
teristics in detail. 

Directive 

A directive is control information that appears on a separate file or in a separate section of the job 
deck. 

Dismountable Device 

A rotating mass storage device which can be logically disassociated from the running system. 
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Display Code 

Character code used internally in the computer. Each character consists of 6 bits (2 octal digits). 

Disposition Code 

A two-character mnemonic indicating device, site, form, and format for processing a file named on a 
ROUTE control statement and a DISPOSE statement or macro. Also, an octal value returned to the 
file environment table corresponding to the ultimate disposition of the file. 

DMPX 

A standard dump which appears on file OUTPUT when a job terminates abnormally. It shows the 
contents of the exchange package for the program, the contents of central processor registers, and the 
contents of words before and after the location at which the program stopped. 

EDITLIB 

A utility program which allows creation or maintenance of library files suitable for use by the loader. 

End-of-Information 

Physical end of data. In card decks, a card with a 6/7/8/9 multiple punch in column one. On SI tapes 
and on labeled S and L tapes, a tape mark followed by an EOF trailer label followed by two tape 
marks. On mass storage devices, the position of the last written data. CDC CYBER Record Manager 
defines end-of-information in terms of file residency and organization. 

End-of-Tape Reflective Marker 

A reflective strip near the end of a magnetic tape. It is used to signal termination of operations on a 
particular volume. At least 1 8 feet of tape must follow this marker. 

EST Ordinal 

The number designating the position of an entry within the equipment status table established at each 
installation. 

Evict 

Evict releases all space occupied by a file to the system, including space occupied by entries in system 
tables. 

Exchange Package 

A 16-word package containing information used in exchange jumps during job execution: contents of 
central processor registers, RA and FL in central memory and in ECS and the program address. It is 
stored in the control point area and printed as part of the standard output of an aborted job. 

Extended Core Storage (ECS) 

ECS contains 60-bit words. ECS has a large amount of storage and fast transfer rates. 

Field Length (FL and FE) 

FL is the number of central memory words assigned to a job. FE is the number of words in the 
direct access area of extended core storage assigned to a job. Within central memory or extended core 
storage, the field length added to the reference address defines the upper address limit of a job. 
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File 

A file is a set of information that begins at begkining-of-information and ends at end-of-information 
and that has a logical file name. All files have at least one partition, which is delimited by a system- 
logical-record of level 17g on mass storage files or tapes in SI format, and by a tape mark on S or L 

tapes. 

A table used for communication between a user program and the operating system when files are pro- 
cessed. An FET created by a compiler or by the assembly language programmer is required within the 
user field length for each file in the program. 

File Set 

One or more related files recorded on one or more volumes. 

Full track (FT) 

Reading/writing sequential sectors on an 844 disk pack (1:1 interlace). 

Half track (HT) 

Reading/writing alternate sectors on an 844 disk pack (2:1 interlace). 

Hang 

A system stop that may be caused by hardware failure or by an error in a system program. An error 
in a user program could cause that program to hang (go into a loop or abort), but no user program 
error should cause a system hang. 

Job Step 

Each individual control statement is a job step. A group of job steps forms a job stream. 

Job Stream 

A job stream is a group of control statements found at the beginning of a deck. 

INPUT 

A logical file name assigned by the system to every job. It contains the image of user job deck. 

JANUS 

A group of system peripheral processor routines which controls the processing of input and output files. 
JANUS controls up to 4 card readers, 3 card punches, and 12 line printers. It normally functions at 
control point 1 but can be assigned to another control point by the operator. 

L Tape 

A labeled or unlabeled magnetic tape containing physical records whose sizes range from one central 
memory word to an upper limit specified by the size of the buffer for that tape. 

Labeled Tape 

A magnetic tape with header and trailer labels having the format of the CDC CYBER 170, CYBER 70, 
or 6000 Series standard labels or the 3000 Series labels; alternately a tape in S or L format with non- 
standard labels. 
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Level 



An indicator specifying relative position in a hierarchy. For priority considerations, level is the lowest 
priority. For system-logical-records, octal level numbers 0-17 can be used to organize files. For overlay 
anu segment ioauing, a pair 01 numuers spechies levei, witu ^0,0j» being the portion of the program 
remaining in memory. 

T 1 HT..__l~~- 

JLJCVCI i>UiiiUCI 

An octal number from 0-17 in a short physical record unit or zero-length physical record unit marker to 
form system-logical-record groups within files. Level number 17 indicates a logical end-of-partition. 
Level number 16 is used by checkpoint/restart and should not otherwise be specified by the user. The 
system creates system-logical-records with a level number of for mass storage files and SI tapes when 
the user does not specify otherwise. 

Library 

A file or collection of files containing executable programs and tables needed to locate and load the pro- 
grams. A system library can contain peripheral processor programs in addition to the central processor 
programs. A user library is file formatted as a library but is not available to a job until it has been 
explicitly brought to the job. 

Load Point 

The reflective marker near the beginning of a magnetic tape. Data, including labels, is written after the 
load point. A rewind positions a single file volume to the load point. At least 10 feet of tape should 
precede the load point marker. 

Load Sequence 

A sequence of load operations which encompasses all of the loader's processing from the time that 
nothing is loaded until the time execution begins. It includes initialization, specification of specified 
loader requests, and completion of load. 

Logical File Name (lfn) 

The 1-7 display coded alphabetic or numeric characters by which the operating system recognizes a file. 
Every lfn in a job must be unique and begin with a letter. 

Macro 

A COMPASS language statement which generates other source language code. 

Master Device 

The member of a device set designated as the device to contain all device set related tables. Every 
device set has one device that is a master device. 

Mount 

A logical operation that associates a device set member with a job. 

Monitor 

The system routine which coordinates and controls all activities of the computer system. It occupies 
peripheral processor and part of central memory. It schedules the use of the central processor and 
the other peripheral processors. 
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Non-Allocatable Device 

A device such as a magnetic tape which can be used by only one job at a given time. 

NUCLEUS 

A system library containing the essential system programs needed to load and execute all other system 
library programs. It is available to all jobs without explicit call. 

OUTPUT 

A logical file name assigned by the system to each job to receive information such as assembly listing, 
diagnostics, load map, dayfile, and program output. It is printed at job termination unless otherwise 
disposed by the user. 

Partition 

A partition is a system-logical-record of level 17 g on a mass storage file or a tape in SI format. On 
a S or L tape, it is delimited by a tape mark. 

Password 

A string of 1-9 letters or digits defining access permission assigned at attach time. Each password implies 
one type of access permission designated for permanent files, such as read, modify, extend, control, or 
turnkey. 

Permanent File 

A mass storage file cataloged by the system so that its location and identification are always known to 
the system. Permanent files cannot be destroyed accidentally during normal system operation (including 
deadstart). They are protected by the system from unauthorized access according to privacy controls 
specified when they are created. 

Physical Record Unit (PRU) 

The smallest amount of information transmitted by a single physical operation of a specified equipment, 
measured in central memory words. A PRU for mass storage devices is 64 decimal words long, a PRU 
for SI format binary magnetic tape is 512 decimal words, etc. 

Private Device 

A mass storage device which can be used only by specific request. It is logically removable and is a 
member of a private device set. 

PRU Device 

A mass storage device or tape in SI format. 

Public Device 

An allocatable mass storage device available to the operating system for assignment of default residence 
files. 



PUNCH 



A logical file name which causes the file to be punched on cards in Hollerith format when the job 
terminates. 
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PUNCHB 

A logical file name which causes the file to be punched on cards in binary format when the job 
terminates. 

Random File 

A file with an index entry to each record in the file. A file on a rotating mass storage device is a 
random file only when the random bit is set in the file environment table. The last record of the 
file is an index. 

Recall 

The state of a program when it has released control of the central processor until a fixed time has 
elapsed (periodic recall) or until a requested function is complete (auto recall). Recall is a system 
action request as well as an optional parameter of some file action requests. 

Record 

CDC CYBER Record Manager defines a record or a portion thereof as the smallest collection of infor- 
mation passed between CDC CYBER Record Manager and a user program. Eight record types exist, as 
defined by the RT field of the file information table (FIT). Other parts of the operating systems and 
their products might have additional or different definition of records. 

Reference Address (RA and RE) 

RA is the absolute central memory address that is the starting, or zero relative address assigned to a 
program. Addresses within the program are relative to RA. RA+1 is used as the communication word 
between the user program and Monitor. RE is the absolute extended core storage starting address 
assigned to file. 

Relative Address 

All addresses in a relocatable program are relative to a base address of zero. When a relocatable pro- 
gram is loaded for execution, the zero base address is assigned to a reference address. At that time, 
all addresses in the program become relative to the reference address. 

Removable Device 

A rotating mass storage device which can be physically detached from the RMS drive. 

Retention Period 

The number of days a permanent file or a device set is to be valid. 

Rolling 

The concept of removing jobs from central memory to mass storage before execution is complete so 
memory can be assigned to a higher priority job. 

Rotating Mass Storage (RMS) 
Disk storage device. 
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S tape (Stranger Tape) 

A magnetic tape (labeled or unlabeled, 7- or 9-track) containing physical records ranging in size from 
2 characters to 5120 decimal characters. This tape does not contain any level numbers. 

Scheduler 

A group of system routines which select jobs for assignment to control points and control swapping 
and rollout of jobs. 

Sequential File 

A file in which records must be located by position, not address. 

Short PRU 

A physical record unit containing data and a marker with an octal level number to mark the end of 
a system-logical-record. The amount of user data in a short PRU is less than the PRU size of the 
storage device. A short PRU defines the end of a system-logical-record. In CDC CYBER Record 
Manager, a short PRU may have several interpretations that depend upon record and block type. 

SI Tape 

A magnetic tape created under NOS/BE 1 with fixed length physical record units. For coded tape = 
128 decimal central memory words; for binary tape =512 decimal central memory words. An SI tape 
can be labeled or unlabeled and written on 7-track or 9-track tape. Identical to SCOPE tape under 
SCOPE 3.3 and 3.4 and to SI format tape under NOS 1 and KRONOS 2.1. 

Staging 

Releasing a tape job from the tape queue for scheduling. 

Standard Labeled Tape 

A tape with labels conforming to American National Standard Magnetic Tape Labels for Information 
Interchange X3.27-1969. Also called a system labeled tape. 

Swapping 

The concept of removing jobs from central memory to mass storage before execution is complete, so 
control point and memory can be assigned to another job. A job is swapped out when it is waiting 
for an external event, or when its control point and/or central memory is needed by a higher priority 
job. 

System Device 

A system device is a device that holds system information. All system devices are PRU devices but not 
all PRU devices are system devices. 

System Libraries 

The collection of tables and object language programs residing in central memory or on mass storage, 
which are necessary for running the system and its product set. 

System-Logical-Record 

A data grouping that consists of one or more physical record units immediately followed by a short 
physical record unit or a zero-length physical record unit. These records can be transferred between 
devices without loss of data or structure. A system-logical-record is equivalent to a CDC CYBER Record 
Manager S type record. 
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Tape Mark 

A short record written on tapes under operating system control to separate label groups, files, and/or 
labels. Interpretation depends on the tape format. 

Unlabeled Tape 

A magnetic tape that does not have a header label. Unlabeled tapes generated by the operating system 
contain a trailer label similar to the trailer for a standard iabeled tape. 

Unit Record Device 

A standard unit record device (such as line printer, card punch, and card reader) runs under control of 
JANUS. A non-standard unit record device (such as graphic consoles, plotters, and paper tape readers 
and punches) runs under installation software. 

Update 

A utility program that allows a source statement program stored on mass storage or tape in Update 
format to be modified and restored. 

User library 

library file a programmer created through the EDITLIB utility. It contains loader tables referencing 
the assembled central processor programs, subroutines, text records, or overlays. 

Volume 

A term synonymous with reel of tape. 

Zero-Length PRU 

A physical record unit, containing only an octal level number, that is used to terminate a system- 
logical-record; it does not contain any user data. In CDC CYBER Record Manager, a zero-length PRU 
with a level designator of 17 8 is a partition boundary. 

Zero-Byte Terminator 

The 12 bits of zero in the low order position of a central memory word are used to terminate a line 
of coded information to be output to a line printer or to represent cards input through a card reader. 
Files with names INPUT and OUTPUT have such terminators while in storage. Any file to be displayed 
at a terminal must also have such terminators for each line to be displayed correctly. A record with 
such a terminator in CDC CYBER Record Manager is a zero-byte record (Z type record). 

In display code, two colons create 12 bits of zeros. If two consecutive colons occur in a file that 
contains zero-byte records, they may be stored in the lower order portion of a word and create a 
zero-byte record. 

Files created at a terminal under the CREATE command contain zero-byte terminated records. 

IxPPU 

Memory speed is 1 microsecond. 

2xPPU 

Memory speed is 0.5 microseconds. 2xPPU is available only on CDC CYBER 170. Memory speed is 
set by the installation. 
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PUNCH CARD AND TAPE FORMAT 



This appendix contains details of the format of punch cards and magnetic tape. Two types of card format 
are discussed: Hollerith or coded cards and binary cards, which include the separator cards used between 
sections of a deck and between decks. Magnetic tape format is discussed in terms of the binary and coded 
formats produced on 7- and 9-track tapes in SI format. 

PUNCH CARD FORMATS 

Punch card formats can be coded Hollerith, standard binary, and free-form binary. 

Hollerith cards are produced when the file name is PUNCH, or the disposition code of the output file is PU 
(octal 0010). Unused columns at the end of the last Hollerith card are blank; a card with 7/8/9 multipunch 
follows the last card produced. 

Standard binary cards are produced when the file name is PUNCHB, or the file has a disposition code of PU, 
IC=BIN, and EC=SB (octal 1210). 

Free-form binary cards are produced when the file name is P80C, or the file has a disposition code of PU, 
IC=BIN, and EC=80COL (octal 2210). If the number of words to be punched in free-form is not an even 
multiple of 16, the unused columns at the right of the last punched card are blank. A card with 7/8/9 is 
produced following the last free-form binary card. The flag cards are not punched as part of the output. 

HOLLERITH FORMAT 

Hollerith cards are often called coded cards. Each column can be punched to represent codes of any given 
character set (see appendix A). The hole code is translated by card reading devices into the binary code 
for the character. Blank columns are translated into a binary code representing a blank space. 

Hollerith punch cards can be in 026 or 029 format. 026 mode is a 63- or 64-character set defined by 
Control Data. 029 mode is a Control Data 64-character subset of the codes defined by the American 
National Standard Code for Information Interchange, X3.4-1968 (ASCII mode). 

Each installation selects the default mode for cards to be read into the system, but cards in an alternative 
mode can be read when the job indicates another card mode. Appendix A shows card codes for 026 and 
029 modes and discusses how to change modes within a job deck. 



END-OF-RECORD CARD 

A card containing octal 0007 (7/8/9) in column 1 separates logical records in a job deck. Level numbers 
associated with the record are punched in Hollerith code in columns 2 and 3. The level number may be 
00,01,02,03,04,05,06,07,10,11,12,13,14,15,16, or 17. If columns 2 and 3 are blank, the level number is 
assumed to be 00. Level numbers 1-7 may be punched with a trailing blank in the form nb, where n is 
the level number and b is a blank. The format of this card is as follows: 
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COLUMNS 
1 2 3 



80 



12 
11 

1 
2 
3 
4 
5 
6 



STANDARD BINARY CARDS 

All standard binary cards must have punches in rows 7 and 9 of column 1 ; thus, any four octal digits ending 
with 5 or 7 would act as a binary card marker. Any card without a 7/9 punch in column 1 is considered 
to be a Hollerith card; no legal Hollerith code contains a 7/9 punch combination. Any Hollerith card 
column containing an illegal Hollerith punch combination is read as a blank, and a message is produced for 
output giving the card number and the number of the record containing the card. 

Binary subprogram or data cards can contain the binary representation of up to 15 central memory words. 
This card type contains a 7/9 punch with a word count in rows 0/1/2/3 and a checksum flag in row 4, all 
in column 1. The word count indicates the number of binary words in the card, starting in column 3 and 
not extending beyond column 77. Column 2 contains a checksum of the binary words in columns 2 
through 77; the value of the checksum is a ones-complement sum, modulo 4095 (2**12 - 1=4095). If the 
checksum flag in row 4 of column 1 is punched, the checksum is ignored by the system. Columns 79 and 
80 contain a card sequence number in binary. The lower five bits in column 79 and all 12 bits in column 
80 make up the 17 bit serial number of the card record within the logical record that contains it. If cards 
are not read in sequential order, a warning message is produced for output; however, the cards are read and 
accepted. 

Columns 1, 2, 78, and 80 are produced when a binary punch file is punched through a remote terminal or 
JANUS controlled device. These columns are removed when the deck is read into the system, so that a 
card has only 1 5 central memory words of information internally. 
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The format of a binary subprogram card is as follows: 



COLUMNS 
12 3 4 5 
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FREE-FORM BINARY CARDS 

Free-form binary cards are unique since they can be read as sixteen 60-bit words per card (eighty 12-bit 
columns) with no checksum or sequence number. For example, a card having 6/7/8/9 punched in column 1 
and at least one punch in one other column can be read as a free-form binary card. Normally, it would be 
treated as an end-of-information card. 

Free-form binary cards must be preceded by a flag card with all 12 rows punched in column 1 and any other 
column and no other punches. This flag card is not read as containing information; it signals that free-form 



no" 



Ac folio 1 - 1 - 7 - 



Any number of cards may follow; none may have the same form as the free-form flag card or a 6/7/8/9 
end-of-information card. The free-form binary cards are read into memory in 16-word increments. After 
the free-form binary cards, another flag card with 12 rows punched in column 1 and the same column as 
the first flag card must appear. This card signals the end of the free-form binary deck and standard binary 
or Hollerith cards follow. The operator's console displays TRAY EMPTY until a matching flag card is read. 

If it is necessary for a free-form binary card with the same appearance as the flag card to appear in the 
deck, it is possible to create a flag card of a different form. Any card having 12 rows in column 1 punched 
and 12 rows in any other column punched with no other punches on the card is recognized as a free-form 
flag; therefore, 79 variations are possible for the flag card. 
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Normally, a series of free-form binary cards and their flag cards are organized into one record in an input file. 
However, they can be preceded and/or followed by standard binary and/or Hollerith cards within the same 
record. The different cards in the record are accepted; however, a message indicating a change in mode is 
produced for the record. A valid record might consist of the following. 

A series of Hollerith cards. 

A start free-form flag card (7777 in columns 1 and 80) with no other punches. 

A series of free-form binary cards without a standard 6/7/8/9 card or any card identical with 2. 

An end free-form flag card identical with 2. 

A start free-form flag card, which might be the same as or different from 2 and 4. 

A series of free-form binary cards as in 3. 

An end free-form flag card identical with 5. 

A series of standard binary cards which should be in order according to sequence numbers. If not. a 
sequence number check message and a mode change message are issued for the record. 

A 7/8/9 card. 

TAPE FORMAT 

7-TRACK CODED SI FORMAT 

For coded data being output on 7-track tape, the PP converts display code to internal BCD codes if a 6684 
converter is not available. The tape controller converts internal BCD to the external BCD codes recorded on 
the tape. In the 63-character set display code, characters 33 and 63 convert to an external BCD 12. How- 
ever, if the last two characters of a central memory word have a display code representation of 0000 (end- 
of-line delimiter byte), they become an external BCD 1632. 

For 7-track coded tapes being read in, the tape controller converts external BCD to internal BCD codes. The 
PRU converts the internal BCD to display codes (if a 6684 converter is not available) before transferring data 
to the file buffer. On input, the external BCD 12 is converted to a display code 33 (zero). The end-of-line 
delimiter byte, which must occur at some multiple of five bytes, is converted to a 0000 display coded 
end-of-line byte. 
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Peculiarities for coded tape for the 63-character set: 

OUTPUT 



INPUT 



Display 


Internal 


External 


Internal 


Display 


Code 


BCD 


BCD 


BCD 


Code 


uu 


16 


16 


16 


(VI 


33 


00 


12 


00 


33 


63 


12 


12 


00 


33 


Line Terminator 0000 


1672 


1632 


1672 


0000 



Display code 00 is not a valid character; display code 63 (colon) is lost. Line terminators (byte of all zeros 
in lowest byte of a central memory word) will not result in the loss of zeros. 



Peculiarities Tor coded tape for the 64-character'set: 

OUTPUT 



INPUT 



Display 


Internal 


External 


Internal 


Display 


Code 


BCD 


BCD 


BCD 


Code 


00 


12 


12 


12 


33 


33 


00 


12 


12 


33 


63 


16 


16 


16 


63 


Line Terminator 0000 


1672 


1632 


1672 


0000 



Display code 00 (colon) is lost; display code 63 is now a valid character. An exception exists when up to 
nine characters precede a line terminator. They are changed in the PP buffer to 63B. On tape, they 
result in external BCD 16. When tape is read, a 63 preceding a line terminator is converted to display code 
zero. This substitution ensures preservation of all zeros preceding a line terminator, regardless of the graphic 
character set used. 

Appendix A contains the conversion tables for these codes. Conversion is performed by a 6684 if it is part 
of the hardware configuration. 

The system-logical-record terminator on 7-track coded tape is eight characters long. Its format in external 
BCD is: 



47 



Blank (Reserved for Future System Use) 



Level Number, in Binary^ 

The level number is the low-order 5 bits of the last character. The upper 2 bits of this character are always 
zero except for level zero which is represented by 010000 (binary). For example, in external BCD, level 5 
would be represented by 2020202020202005 and level would be represented by 2020202020202020. 

A record terminator marker is appended to the record data, if possible, or written as the only information 
in the following tape block. 
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7-TRACK TAPE BINARY SI FORMAT 

The system-logical-record terminator on 7-track binary tape is 48 bits long. Its format is: 



47 




35 




23 


11 




5 







5523 


3552 


2754 


00 


L 



The marker immediately follows record data if it can be contained within the tape block; otherwise, it is 
written as the only information in the following tape block. 

9-TRACK TAPE CODED OR BINARY SI FORMAT 

When SI format 9-track tapes are written or read, information is not converted by the system. All 60-bits 
of a word in central memory are written to the tape; each pair of 12-bit bytes is written as three 8-bit 
characters. Conversely, each three 8-bit characters on a tape are written as two 12-bytes when the tape is 
read. Paritial central memory words cannot be read or written on SI tapes. SI tapes can be written or 
read in packed mode. 

The system-logical-record terminator has the same format as that for 7-track coded tapes. 

Table C-l summarizes tape file characteristics. 
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CDC CYBER 170 MODEL 176 DIFFERENCES 



^iqiqj Hardware Qiiisrsncss dsiwsgh ll'l ^ t n£ k. \ s\j iviouGi i /o aim Ouier v^/v> ^ijdi^is. i /u niuucis circ as 
follows: 

CDC CYBER 170 Model 176 extended memory is analogous to the CDC CYBER 70 Model 76 large 
central memory (LCM) or large central memory extended (LCME). Extended memory cannot be 
shared between mainframes and does not have a distributive data path (DDP) access. Shared mass 
storage (not 819 disk) and coupler linkage multimainframe (MMF) modes are supported; the ECS MMF 
link is not supported. The maximum extended memory block copy size is 1023 decimal words. 

The instruction word stack has a 2-word read-ahead and is not voided by a jump out of the stack or 
02 (JP) instruction. When instructions are modified, a return jump is required to void the stack before 
the modified instructions are executed. 

Because of these differences, products have been modified to execute and compile based on a MODEL=176 
value in the MODEL micro (refer to the NOS/BE Installation Handbook). Binaries generated by other model 
settings will not necessarily run under the new models and vice versa. 

CDC CYBER 170 Model 176 is not compatible with the CDC CYBER 170 Model 175 in the following ways. 

Model 176 systems always execute in CEJ/MEJ mode; the switch, if present, has no effect. 

Model 176 peripheral processor subsystem (PPS) can cause exchange jumps in the CPU only when the 
monitor flag is clear. 

Model 176 instruction word stack (IWS) is not degradable. 

Model 176 CPU has an instruction word step mode. 

Model 176 02 instruction does not void the IWS. 

Model 176 jump out of stack does not void the IWS. 
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CDC CYBER 70 Model 76 LCM/LCME memory replaces ECS as extended memory on CDC CYBER 170 
Model 176. The maximum number of 60-bit words that can be transferred in the block copy instruction is 
1023 decimal. CDC CYBER 170 Model 176 does not support flag register operations. Extended memory 
has single error correction/double error detection (SEC/DED). 

The Oil, 012, and 013 instructions are legal on a model 176 in any word parcel. NOS/BE forces a 

half eyit ac nprfnrmpfi nn mrwipl 1 7^ if tViA inetm^tirm ic in tn» nntuf wmA normal 

The 014-017 instructions are legal on model 176. 

The 464-467 instructions are legal no-op instructions on model 176. 

30-bit instructions in parcel 3 are legal on model 176. 

Model 1 76 shift unit tests bits 6 through 11 of Bj to determine if the shift count exceeds 63 decimal. 

Model 176 shift unit returns negative zero when a negative number is right shifted by more than 63 
decimal places. 

Model 176 divide unit enters a 4000. . . . pattern below the least significant bit of the dividend on 
round operations. Overflow or underflow on exponent subtract returns overflow or underflow. 

Model 176 floating add unit returns a positive zero if the shift count exceeds 128. 

Model 176 branch instructions sense infinite and indefinite as out of range. 

A central exchange (013 instruction) exchanges to RAS + K on a model 176. 

Model 176 CPU has no breakpoint capability. 
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Abort 


Permanent file 4-71 


ABORT macro 7-14 


Tape 4-55,72; 7-42 


Processing 2-14; 7-14 


When needed 3-3,8 


Recovery 7-30 


Attach 


ABS control statement 4-5 


ATTACH control statement 


Absolute dump 4-5 


ATTACH macro 7-81 


Access to file (also see Assign) 


GETPF control statement 4- 


Exclusive 3-16 


Attributes of device set 3-8 


Multi-read 3-16 


AUDIT utility 4-9 


Permission 3-15; 6-20 


Automatic 


ACCOUNT control statement 4-5 


Device assign 4-71 


Accounting 


Recall 7-2 


ACCOUNT control statement 4-5 


Tape assign 3-39; 4-55,74 


Dayfile messages 2-17 




Job 4-5 




Job statement 4-2 




Permanent file 3-21 ; 4-9 


Backspace (see BKSP) 


SUMMARY control statement 4-93 


Batch job 2-1 


ADD directive of EDITLIB 4-42 


BEGIN control statement 5-24 


ADDSET control statement 4-6 


Beginning-of-information 3-6 


ALTER 


Binary 


Control statement 4-7 


Default file name 2-6 


Macro 7-81 


Program load 4-61 


ANSI label format 3-32 


Binary tape format 


Archive 


(See copy utilities) 


Dump 4-34 


(See SI, S, L tape) 


File definition 3-16 


(See 7-track, 9-track tape) 


ASCII 


BKSP 


Character set A-l 


Control statement 4-11 


Print file codes 3-40 


Macro 7-72 


Assembler (also see COMPASS) 


BKSPRU macro 7-73 


Call 2-7 


Block store ECS 4-4 


Assign 


Buffer 


Device to job 


CIO 6-21 


Device set MOUNT 4-66 


ECS 3-26 


Other REQUEST 4-71; 7-42 


Busy bit of FET 6-5 


Device to set 




ADDSET 3-9; 4-6 




File to device 


Call-by-name control statement 


Device set 4-71; 7-42 


Carriage control 


ECS 4-77 


Add with COPYSBF 4-25 


Multi-file set 3-38 


COPYBCD 4-18 



4-8 



5-25 
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Print file 3-40 
Catalog 

CATALOG control statement 4-12 

CATALOG macro 7-81 

Permission 3-15 
CCL 

Conditional control statements 5-9 

Expressions 5-2,4 

Functions 5-8,16 

Iterative control statements 5-12 

Operands 5-4 

Operators 5-2 

Procedures 4-37; 5-19 

Sample jobs 5-35 

Symbolic names 5-5 

Syntax 5-2 
CDC CYBER hardware 1-1,6 
CDC CYBER Record Manager 

File copy 4-19,22 

Macro summary 7-9 

Permanent file parameter 4-13 

Product summary 1-10 

Random files 3-6,11 

Record types 3-7 
Central memory (also see Field length) 

Definition 1-2 

Request 4-3,82; 7-17 
Character set 

Codes A-l 

Conversion 3-32 
Checkpoint/Restart (see CHECKPT, CKP, RESTART) 
CHECKPT macro 7-40 
CIO codes 6-6 
Circular buffer 

FET fields 6-14 

Usage 6-21 

WRITOUT 7-65 
CKP control statement 4-14 
CLOCK macro 7-20 
Close 

Indexed file 6-9 

CLOSE macro 7-49 

CLOSER macro 7-51 

UP bit 7-51 
CM (also see Central memory, Field length) 

Parameter 4-3 
Code and Status (see CS) 



Coded tape (see SI, S, L tape) 
COMBINE control statement 4-15 
Comment 

COMMENT control statement 4-15 

Informal 4-2 

Procedure 5-34 
Communication 

Area 7-6 

FET 6-1 

Macros 7-11 

With operator 1-7 
COMPARE control statement 4-16 
COMPASS macros 7-1 
Compiler calls 2-7 
Completion bit of FET 6-5 
Conditional control statements 5-9 
Console 1-7 
Constants, integer 5-5 
CONTENT directive of EDITLIB 4-43 
Control permission 3-15 
Control point 1-3 
Control point area 

Defined 1-3 

Dump 4-31 
Control statement 

Efficient ordering 2-8 

Section in deck 2-4 

Syntax 4-1 

Parameter cracking 7-6 
CONTROLC macro 7-29 
Copy 

COPY utility 4-17 

COPYBCD utility 4-18 

COPYBF utility 4-18 

COPYBR utility 4-21 

COPYCF utility 4-18 

COPYCR utility 4-21 

COPYL utility 1-13 

COPYN utility 4-22 

COPYSBF utility 4-27 

COPYXS utility 4-27 

Library copy 4-37 
Core (see Central memory, Field length) 
CP parameter 4-4 
CPC 7-3,1 1 
CPU 

Characteristics 15 
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Selection 
Time limit 
Create 



4-4 
4-3 



t «i a in 

jjorary t-J/ 
Permanent file 4-12 
CS 

«-i_j„ r „ /: 10 

Codes for status 6-5 
Field of FET 6-5 
Cycle 

Incomplete 3-18 
Permanent file 3-14 



.DATA command 5-32 
sDATA parameter 5-22,33 
DATE macro 7-20 
Dayfile 

Comment 4-15 

Explanation 2-16 

Job 2-15 

Message macro 7-18 
DC codes 4-84 
Deck structure (see Job deck) 
DELETE directive of EDITUB 4-43 
DELSET control statement 4-28 
Density (see Magnetic tape) 
Dependent job 

Count 4-96 

Identification 4-4 

Multi-mainframe 4-5 

TRANSF 4-95; 7-29 
Device set 

Add device 4-6 

Create master device 4-6 

Default 3-8 

Defined 3-7 

Delete device 4-28 

Dismount 4-33 

Master 3-7 

Mount 4-66 

Name 3-9 

Private set usage 3-9 

Public set usage 3-8 

Recovery 4-69 
Device types 6-7 



Directives 

COPYN 4-23 

Defined 2-9 

EDITUB 4-39 

LABELMS 4-58 

Permanent file dump 4-36 
DISCARD INTERCOM command 3-20 
Disk pack (see Rotating mass storage) 
Dismount pack 4-33 
DISPLAY control statement 5-13 
Dispose of file 

DISPOSE control statement 4-29 

DISPOSE macro 7-75 

Disposition codes 6-12 

EVICT macro 7-74 

Need for 3-4 

Remote terminal 4-29 

RETURN control statement 4-80 

ROUTE control statement 4-82 

ROUTE macro 7-76 

UNLOAD control statement 4-99 

UNLOAD macro 7-74 
DMP control statement 4-31 
DMPECS control statement 4-32 
DMPX 

Definition 2-14 

Format of output 4-31 

Suppress 7-15 
Drop job 2-15; 4-50 
DSD 1-6 



4-33 



DT function 5-18 

Dump 

Absolute memory 
Checkpoint 4-14 
ECS 4-32 
Exchange package 
Format of output 
Permanent files 
Relative memory 



4-5 



4-31 
4-31 
4-34 
4-32 



DUMPF utility 4-34 



EC codes 4-84; 6-12 
ECS 

Buffered files 3-26; 4-8,77 
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Direct access request 4-4 
Dump 4-32 
Hardware 1-9 
Request 4-77 
Resident files 3-27 
EDITLIB 

Directive summary 4-39 

Examples 4-49 

Utility 4-37 
EEC 4-56,76 

ELSE control statement 5-10 
End-of-file (see Partition) 
End-of-information 

Job deck 2-4 

Physical structure 3-6 
End-of-partition (see Partition) 
ENDIF control statement 5-11 
ENDRUN 

Directive of EDITLIB 4-44 

Macro 7-15 
ENDW control statement 5-12 
Entry points and libraries 2-4 
.EOF command 5-34 
EOF labels 3-36 
.EOR command 5-34 
EOV labels 3-36 
EP bit 3-27; 4-78; 6-10 
Error processing (see EP bit) 

Detailed code in FET 6-14 

ECS 3-27 

Tape 6-15 
Evict file 

DISPOSE 4-29; 7-75 

EVICT macro 7-74 

RETURN 4-80 
Exchange package 

Contents 4-31 

Definition 1-6 

Dump 4-31 
Execution 

Call 2-5 

EXECUTE control statement 4-50 
Exit 

ABORT macro 7-14 

EXIT control statement 4-50 

Job termination 2-14 



Expired 

Device set 4-7 

Label 3-38 

Permanent file 4-13 

Permanent file dump 4-35 
Extend 

EXTEND control statement 4-51 

EXTEND macro 7-81 

Permission 3-15 
Extended core storage (see ECS) 
Extended label processing 

FET 6-25; 7-44 

Usage 3-33 
Extended print train 3-40 



FDB macro 7-81 
FET 

Creation 6-1 

Definition 6-1 

Label fields 6-23 

Table 6-2 
FETCH INTERCOM command 3-20 
Field length 

Change 4-82 

Definition 1-4 

Dump 4-29 

Library table 4-42 

Reduction 4-70 

Request on job statement 4-3 

Management 4-70,82 

MEMORY macro 7-17 

REDUCE control statement 4-70 

RFL control statement 4-82 
FILE control statement 1-11; 4-18 
File environment table (see FET) 
File flush bit 6-1 1 
FILE function 5-16 
File 

Beginning-of-information 3-6 

Definition 3-1 

Disposition 4-82 

Divisions 3-6 

End-of-information 3-6 

General information 34 
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Label 3-32 

Name 3-1 

Request 4-71; 7-42 
FILE macro 7-10 
sFILE parameter 5-22,33 
FILEB macro 6-3 
FILEC macro 6-3 
FILESTAT macro 7-23 
FILINFO macro 7-24 
FINISH directive of EDITLIB 4-44 
FL (see Field length) 
Flaws 4-58 
FNT pointer 6-14 
FORM product summary 1-12 
Forms code 4-82 
Function macros 7-84 



GENLDPF utility 4-53 
GETACT macro 7-23 
GETJCI macro 7-26 
GETMC macro 7-16 
GETPF control statement 4-54 
Global library 2-5 



Hardware 

Error mode 4-65 
Functions 1-1 



IC codes 4-86; 6-13 
IEC 4-56,76; 7-44 
IFE control statement 5-9 
Indexed file 

Definition 3-12 

Fields in FET 6-18 

Random bit and CLOSE 6-9 

Usage 3-12 
Inhibit implicit mount bit 6-11 
INPUT file 

Defined 3-2 

Usage 2-1 
Integer constants 5-5 
Interactive jobs 2-1 



INTERCOM 

File routing 4-82 

Library table parameters 4-41 

Memory use 1-4 

Permanent file usage 3-20 

Product summary 1-10 

SYSBULL 4-94 

Terminal characteristics 4-84 
IOTIME macro 7-21 
ITEMIZE utility 1-13 
Iterative control statements 5-12 



JANUS 

Definition 1-4; B-4 

File disposition 4-84 

PM line 3-40 

Separator card handling 2-4 
JDATE macro 7-20 
JDT ordinal 2-9 
Job 

Accounting 2-17; 4-5,93 

Dayfile 2-15 

Definition 2-1 

Dependent 4-4,95 

Execution in system 2-9 

History 2-15 

Mainframe selection 4-5 

Name 4-2 

Rerun 2-15 

Termination 2-14; 4-50 
Job deck 

Control statement section 24 

Directive section 2-9 

Name is INPUT 3-2 

Separator cards 2-3 
Job statement 4-2 



L tape (also see Copy) 
FET 6-1 
Structure 3-7,30 

Labels for tapes 

(Also see SI, S, L tape) 
(Also see 7-track, 9-track tape) 
Default, LABEL 4-57 
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Definition 3-32 

Density 3-31 

FET format 6-23 

LABEL control statement 4-55 

LABEL macro 6-24 

Multi-file set 3-37 

Placement 3-33 

Standard 3-36 

User processing 4-75; 6-11,25 
LABELMS utility 3-9; 4-58 
LDSET control statement 2-5; 4-65 
Level number 

Copy to S/L tape 4-19,21 

In job deck 2-4 

In system-logical-record 3-5 

Level 16 3-6; 7-54 

Level 17 3-5; 7-54 
LFN (see Logical file name) 
LGO 2-6 
Library 

Copy 4-36 

Create 4-35 

LIBRARY loader statement 2-5 

LIBRARY directive of EDITLIB 4-44 

list 4-45 

System use 2-4 

User 2-5 
Limit 

CPU time 4-3 

LIMIT control statement 4-60 

Mass storage 4-60 
Line length OUTPUT 3-2 
LISTLIB directive of EDITLIB 4-45 
LISTMF utility 4-60 
Literal 4-1 
Load 

LOAD control statement 4-61 

Map 4-65 

Permanent file 4-61 

Point of tape 3-28 

Sequence 2-5 
Loader 2-5 
LOADPF utility 4-61 
Logical file name 

Definition 3-1 

Reserved 3-1 



Magnetic tape files 

(Also see S, L, SI tape) 

(Also see 7-track, 9-track tape) 

Characteristics C-7 

Compare with disk 4-16 

Density 3-31 

Format C-4 

Job statement parameter 4-4 

Labels 3-32 

Off-line listing 4-18 

Scheduling 3-39; 4-4 

Unit limit 4-4,80 

Usage summary 3-38 
Mainframe 

Definition 1-2 

Identification 4-5 

Permanent file usage 3-18 
MAP control statement 4-65 
Mass storage (see Rotating mass storage) 
Master device 

Create 4-6 

Definition 3-7 

Established 3-9 
Memory (see Central memory, Field length, ECS) 

MEMORY macro 7-17 
Merge with COPYN 4-22 
Message (see Comment) 

MESSAGE macro 7-18 
MLRS field 3-31; 6-17 
Mode 

Error 4-65 

MODE control statement 4-65 
Mode of parameter substitution 5-25 
MODEL micro 7-11 
Modify permission 3-15 
Monitor 1-6 

MOUNT control statement 4-66 
MUJbit 6-11 
Multi-mainframe 

Definition 1-2 

Permanent files 3-17; 4-8 

Selection 4-5 
Multi-file set 

Defined 3-37 

Labels 3-37; 4-57 

List 4-60 
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Positioning 3-38 
Request 4-74 
Return 4-81 
Rewind 4-8 i 
Multi-read permission 3-16; 4-55 



Name/number index 3-12 
NUCLEUS library 2-5 
NUM function 5-19 
Number base 4-2 



OPEN macro 7-47 
Operator 

Communication 4-67 

Console 1-7 

Drop of job 2-15 

Label processing 4-55 

Pause bit 7-6 
OUTPUT file defined 3-2 
Overflow, file 4-78 
Owncode exits 

EOI 6-18 

EP 6-10 

Exit 6-3,19 

General 6-23 

XL 6-11 

XP 6-11 
026, 029 mode 4-2; A-l 



P register 4-31 
P register dump 4-31 
Parameter substitution mode 
Parity error 

Hardware 4-65 

Tape 4-74 

Permanent file 4-11 

Recovery inhibit 6-11 
Partition 

Defined 3-7 

In INPUT file 2-3; 3-2 

System-logical-record 3-5 



5-25 



Password (see Permission) 
PAUSE control statement 4-67 
PERM macro 7-85 
Permanent file 

(Also see ALTER, ATTACH, CATALOG, EXTEND, 
PURGE, RENAME) 



*C6Ss .5- 1 



Acce 

Accounting 3-21 

CATALOG control statement 

CATALOG macro 7-81 

Concepts 3-14 

Definition 3-13 

Device 3-8 

Dump 4-34 

INTERCOM usage 3-17,20 

Manager 3-14 

Name 3-14 

Parameter summary 

Privacy 3-13 

Read-only access 

Status 4-9 



4-12 



3-19 



3-16 

3-18 
Permission 

Bits in FET 6-20 
Cancel 4-1 1 
Permanent file 3-15 
Other file 3-15 
Universal 3-9,15; 4-6 
PFLOG utility 4-67 
PFN (see Permanent file) 
Phase encoded tape C-7 
Physical record unit (see PRU) 
PM line 3-40 
POSMF macro 7-48 
FPU 1-6 

Prefix table and COPYN 4-23 
Print file 

4-18 
4-27 
3-40 
3-2 
4-82 



COPYBCD 
COPYSBF 

Definition 
OUTPUT 
Special form 
Usage 3-40 
Zero-byte records 
Private device set 
Definition 3-7 
Examples 3-10 



3-7 
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INTERCOM 3-20 

Usage 3-9 
.PROC statement 5-21 
Procedure 

Body 5-22 

Call 5-24 

Call and return 5-22 

Call and substitution examples 

Commands 5-32 

Comments 5-34 

Header statement 5-21 

Residence 4-37; 5-20 

Return 5-30 

Structure 5-21 
Product set 1-1 
PRU 

Definition 3-5 

Device copy 4-18,19 

Permanent file end 4-7 

Short PRU 3-5 

SI tape 3-29 

Size field 6-14 

Tape C-7 

Zero-length PRU 3-5 
PUBLIC ID 3-14 
Public device set 

Definition 3-7 

File buffering 3-26 

Usage 3-8 
Punch card format C-l 
PUNCH file 3-2 
PUNCHB file 3-2 
PURGE 

Control statement 4-68 

Macro 7-81 
P80C file 3-3 



Queue 

Input 2-1 

Output 2-1 

Permanent file 3-16 

Tape 2-8 
Queue set 3-8 



5-26,28 



RA (see Reference address) 
RAjcxx symbols 7-11 
RA+1 7-1 
Random bit 

In FET 6-9 

Use 3-11 
Random files (also see Indexed file) 

Definition 3-11 

Device 3-11 

R bit 6-9 
RANTOSEQ directive of EDITLIB 445 
RB conflict 4-11,69 
RBR 4-59 
RBT 3-8 
Read (also see Multi-read) 

Permission 3-15 

READ macro 7-54 

READIN macro 7-58 

READN macro 7-57 

READNS macro 7-55 

READSKP macro 7-56 
Recall 

Concept 7-2 

RECALL macro 7-19 
Record (also see System-logical-record) 

Terminator 3-5 

Type 7-9 
Record identification statement 4-24 
Record Manager (see CDC CYBER Record Manager) 
RECOVER utility 4-69 
RECOVR macro 7-30 
REDUCE control statement 4-70 
Reference address 

Defined 1-4 

to 100 contents 7-6 
Register 

CPC 6-23 

Defined 1-6 

Dump 4-31 

Save 7-13 

System action macro use 7-14 
Remote 

Batch jobs 2-1 

File routing 4-30,82 

Terminals 1-10 
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Control statement 4-70 

Macro 7-81 
REPLACE directive of EDITLIB 4-45 
REPRIEVE macro 7-39 
REQUEST 

Control statement 4-71 

Macro 7-42 

VS. LABEL 4-55 
Rerun of job 2-15; 4-50 
RESET call 7-34 
Reserved file names 3-1 
RESTART utility 4-79 
RESUME call 7-34 
Retention period 

Device set 4-7 

Label 4-57 

Permanent file 3-9; 4-7,13 
RETURN 

Control statement 4-80 

Through CLOSE macro 7-49 
Return codes 7-83 
REVERT control statement 5-30 
REWIND 

Control statement 4-81 

Directive of COPYN 4-23 

Directive of EDITLIB 4-46 

Macro 7-73 
REWRITE macro 7-67 
REWRITEF macro 7-67 
REWRITER macro 7-67 
RFILEB macro 6-3 
RFILEC macro 6-3 
RFL control statement 4-82 
Ring, write 4-56,73 
Rolling 1-5; 2-9 
Rotating mass storage 

Definition 1-7 

Structure summary 3-6 
ROUTE 

Control statement 4-82 

Examples 4-87 

Macro 7-76 
RPHR macro 7-57 
RPV 

Call 7-30 

Extended 7-34 

Normal 7-30 
RTIME macro 7-20 



S tape (also see Copy) 

FET 6-1 

Structure 3-7,30 
Save tape 4-73 

SAVEPF control statement 4-90 
Scheduler 2-9 
SCOPE 2 deck 2-4 
Scratch file 

Definition 3-3 

Disposition 3-4 

Tape request 4-56,72,74 
Separator cards 

In INPUT file 3-2 

In job deck 2-3 
Separator characters 4-1 
SEQTORAN directive of EDITLIB 4-46 
SET control statement 5-14 
SETJCI macro 7-27 
SETAL directive of EDITLIB 4-46 
SETFL directive of EDITLIB 4-47 
SETFLO directive of EDITLIB 4-47 
SETNAME control statement 4-9,92 
SETUP call 7-33 
Short PRU 3-5 
SI tape (also see Copy) 

Structure 3-29 
SKIP control statement 5-10 
Skip count field 6-20 
SKIPB 

Control statement 4-92 

Directive of EDITLIB 4-47 

Macro 7-71 
SKIPF 

Control statement 4-93 

Directive of COPYN 4-24 

Directive of EDITLIB 4-48 

Macro 7-71 
SKIPR directive of COPYN 4-24 
Special-named files 

Definition 3-1 

Disposition at job end 4-83 

Evict 4-83 

RETURN 4-81 
ST parameter 4-5 
Status 

And control register 1-7 

Field of FET 6-5 

Macros 7-19 

Permanent file audit 4-9 
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STATUS macro 7-21 

User library 441 
STORE INTERCOM command 3-20 
Substitution mode, parameter 5-25 
SUMMARY control statement 493 
Swapping 1-5 
Switch 

Bits 7-6 

SWITCH control statement 4-94 
Symbolic names 5-5 
Syntax 

Control statement 4-1 

COPYN directives 423 

EDITLIB directives 439 

Job statement 42 
SYSBULL control statement 494 
SYSCOM macro 7-1 1 
SYSTEM macro 7-12 
System-logical-record 

Definition 3-5 

Equivalent S7L tape 3-7 



Tape (see Magnetic tape) 
Tape mark 

Definition 3-28 

End-of-information 3-29,30 

WRITEF 7-63 
Tape unit 3-31 
Terminals 1-10 

(Also see INTERCOM) 
Terminator 41 
Termination of job 2-14; 450 
Text 

EDITLIB considerations 437 

Macro location 7-11 

System 7-85 
TIME macro 7-21 
Time 

Limit specification 4-3 

limit recovery 7-28 
TRANSF control statement 495 

Macro 7-29 
TRANSPF utility 496 
Turnkey permission 3-15 



U label 475 

UBC field 3-31; 6-16 

Unit record equipment 

Hardware 1-8 

Request 477 
Unload 

Tape inhibit 4-73 

UNLOAD control statement 499 

UNLOAD macro 7-74 
UP bit 6-9 

Update product summary 1-12 
User library 

Creation 4-37 
Utilities 

Common product 1-13 

Copy (see Copy) 

FORM 1-12 

permanent file 3-19 



Volume 

Copy 419 

Defined C-7 
Volume serial number 

Device set 4-6 

Tape 474 

Usage 2-8; 3-38 
VOL label 3-36 
VSN control statement 4100 



WEOF directive of COPYN 424 
WHILE control statement 5-12 
Working storage 6-14 
WPHR macro 7-63 
WRJTE macro 7-61 
7-63 



WRITEF macro 
WRITEN macro 
WRITER macro 
WRITIN macro 
WRITOUT macro 
WTMK 7-11 



7-64 
7-62 
7-69 
3-12; 7-65 
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X tape conversion 4-27 
XJ instruction 7-1 



Y label 4-56,75 



Z label 3-32; 4-56,75 
Zero-byte terminated records 
COPYBCD utility 4-18 
COPYSBF utility 4-27 



JANUS fi] 


les 1-8 


Zero-length PRU 3-5 


3000 series labels 4-56,75; 6-23 


/-uavk tape 

Request 
Structure 


4-72 
3-51 


9-track tape 
Request 
Structure 


4-75 
3-31 
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ABORT 


7-14 


PERM 


7-85 


ALTER 


7-81 


POSMF 


7-48 


ATTACH 


7-81 


PURGE 


7-81 






PUT 


7-10 


BKSP 


7-72 


PUTP 


7-10 


BKSPRU 


7-73 










KJ1AJU 


7-54 


CATALOG 


7-81 


READIN 


7-58 


CHECK 


7-10 


READN 


7-57 


CHECKPT 


7-40 


READNS 


7-55 


CLOCK 


7-19 


READSKP 


7-56 


CLOSE 


7-49 


RECALL 


7-19 


CLOSEM 


7-10 


RECOVR 


7-30 


CLOSER 


7-51 


RENAME 


7-81 


CONTRLC 


7-29 


REPLACE 


7-11 








7-39 


DATE 


7-19 


REQUEST 


7-42 


DELETE 


7-1 i 


REWIND 


7-73 


DISPOSE 


7-75 


REWINDM 


7-10 






REWRITE 


7-67 


ENDFILE 


7-11 


REWRITEF 


7-67 


RMTtDTTV 


7-15 


PUWOITCD 


l-Ot 


EVICT 


7-74 


RFILEB 


6-3 


EXTEND 


7-81 


RFILEC 


6-3 






ROUTE 


7-76 


FDB 


7-8! 


RPHR 


7-57 


FETCH 


7-10 


RTIME 


7-19 


FILE 


7-10 






FILEB 


6-3 


SEEK 


7-10 


FILEC 


6-3 


SETJCI 


7-27 


FILESTAT 


7-23 


SKIP 


7-10 


FILINFO 


7-24 


SKIPB 


7-71 






SKIPF 


7-71 


GET 


7-10 


STATUS 


7-21 


GETACT 


7-23 


STORE 


7-10 


GETJCI 


7-26 


SYSCOM 


7-11 


GETMC 


7-16 


SYSTEM 


7-12 


ncTD 


7-10 










TIME 


7-19 


IOTIME 


7-19 


TRANSF 


7-29 


JDATE 


7-19 


UNLOAD 


7-74 


LABEL 


6-24 




7-11 






WPHR 


7-63 


MEMORY 


7-17 


WRITE 


7-61 


MESSAGE 


7-18 


WRITEF 


7-63 






WRITEN 


7-64 


OPEN 


7-47 


WRITER 


7-62 


OPENM 


7-10 


WRITIN 


7-69 






WRITOUT 


7-65 
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